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Preface 

This  thesis  is  a  comparison  of  the  accuracy  of  two 
Monte  Carlo  techniques  of  system  reliability  estimation 
previously  developed  at  the  Air  Force  Institute  of  Tech¬ 
nology.  In  addition,  two  attempts  at  improving  the  accuracy 
of  one  of  these  techniques  are  made. 

I  wish  to  thank  my  thesis  advisor,  Dr.  Jon  R.  Hobbs, 
for  his  suggestions,  assistance,  and  patience  during  my 
study  of  this  topic.  I  would  also  like  to  thank  Dr.  Albert  H. 
Moore  for  suggesting  this  topic  and  for  his  initial  guidance 
in  starting  this  project.  Thanks  also  goes  to  Dee  Babiarz 
who  typed  this  thesis. 
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Abstract 

The  purpose  of  this  thesis  is  to  compare  the  accuracy 
of  two  Monte  Carlo  simulation  techniques  of  finding  lower 
system  reliability  confidence  limits:  the  bivariate  tech¬ 
nique  and  the  univariate  technique.  The  actual  results  com¬ 
pared  are  the  confidence  interval  coverages  of  the  true  sys¬ 
tem  reliability  associated  with  the  confidence  limits. 

The  bivariate  technique  is  based  upon  the  assumption 
that  the  maximum  likelihood  e  jimators  of  the  component 
shape  and  scale  parameters  have  an  asymptotic  normal  distri¬ 
bution.  The  univariate  technique  uses  the  assumption  that 
the  component  reliability  estimates  have  a  normal  distribu¬ 
tion.  Two  variations  of  the  univariate  technique  are  also 
examined.  The  first  variation  assumes  that  component  relia¬ 
bility  estimates  follow  a  beta  distribution  instead  of  a 
normal  distribution.  The  second  variation  replaces  all  per¬ 
fect  system  reliability  estimates  with  new,  adjusted  relia¬ 
bility  values. 

The  results  show  that  the  bivariate  technique  is  the 
most  accurate  technique  if  the  true  system  reliability  is 
believed  to  be  below  0.95  in  value.  The  univariate  tech¬ 
nique  which  is  adjusted  for  perfect  system  reliability  esti¬ 
mates  is  the  most  accurate  technique  if  the  true  system 
reliability  is  believed  to  be  at  least  0.95  in  value  and  if 
the  component  data  used  has  a  sample  size  of  twenty  or  less. 
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The  use  of  the  beta  distribution  in  place  of  a  normal  dis¬ 
tribution  for  component  reliability  estimates  in  the  univar¬ 
iate  technique  proved  to  be  more  accurate  only  at  higher 
confidence  levels  and  only  more  accurate  than  the  original 
univariate  technique. 


A  COMPARISON  OF  THE  ACCURACY  OF  UNIVARIATE 
AND  BIVARIATE  TECHNIQUES  FOR  FINDING  THE 
LOWER  CONFIDENCE  LIMITS  OF  SYSTEM 
RELIABILITY 

I .  Introduction 

The  military  services  have  been  seriously  concerned 
with  system  reliability  since  World  War  II  when  the  field 
failure  of  their  equipment  became  severe.  At  the  end  of  the 
war,  the  Department  of  Defense  conducted  reliability  studies 
over  a  five  year  period  (1945  to  1950).  It  found  that 
electronic  equipment  used  during  Naval  maneuvers  only  worked 
thirty  percent  of  the  time,  that  up  to  three-fourths  of 
Army  equipment  was  out  of  commission  or  under  repair,  and 
that  equipment  maintenance  and  repair  costs  for  the  Air 
Force  were  ten  times  the  original  cost  of  the  equipment.  As 
a  result  of  these  findings,  the  Department  of  Defense  estab¬ 
lished  an  ad  hoc  committee  on  reliability  in  1950,  formalized 
the  committee  (AGREE — Advisory  Group  on  the  Reliability  of 
Electronic  Equipment)  in  1952,  and  began  publishing  relia¬ 
bility  specifications  for  its  military  electronic  equipment 
in  1957  (Ref  27:1,12). 

Although  advances  in  technology  since  World  War  II 
have  resulted  in  increased  system  reliability,  the  military 
services  are  still  concerned  with  system  reliability  today 
because  of  the  varied  environments  in  which  their  systems 
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must  function  (the  failure  rate  increases  as  the  environ¬ 
ment  becomes  more  severe  (Ref  27:2-3),  the  changed  nature 
of  conflict  (there  no  longer  is  one  weapon  per  soldier  but 
systems  of  weapons  (Ref  4:2-3),  and  the  increased  number  of 
people  affected  by  the  weapons  used  in  a  conflict.  Since 
the  exact  reliability  of  a  system  cannot  be  measured 
directly  before  it  is  put  into  field  operation  unless  highly 
expensive  testing  is  conducted,  the  reliability  is  estimated 
while  the  system  is  still  being  designed  and  built.  The 
military  services  engage  in  reliability  prediction  not  only 
to  assure  that  the  system  will  achieve  its  mission  once  it 
is  in  the  field,  but  also  to  help  pinpoint  potential  prob¬ 
lems  in  the  design  before  the  system  is  built  and  to  achieve 
an  economical  design  that  will  minimize  system  life  cycle 
costs  (Ref  4:208,211). 

Because  of  continuing  budget  constraints,  reliability 
prediction  will  have  to  be  made  using  less  system  testing 
and  more  efficient  and  effective  methods  of  reliability 
estimation.  As  a  result,  the  military  services  are  exploring 
methods  for  predicting  reliabilities  of  complex  systems  from 
system  component  test  data.  Since  these  predictions  can 
vary  considerably  in  accuracy,  upper  and  lower  limits  are 
attached  to  the  probable  range  of  the  predictions.  When 
these  limits  are  determined  to  a  desired  degree  of  confi¬ 
dence,  they  are  called  reliability  confidence  limits. 


2 


Background 

A  method  for  determining  the  lower  confidence  limit  of 
the  estimated  system  reliability  was  presented  in  1960  by 
Donald  Orkand.  This  proposed  technique  used  Monte  Carlo 
simulation  to  generate  system  reliability  estimates  using 
sample  component  failure  data.  He  chose  to  concentrate  on 
finding  the  lower  confidence  limit  since  this  limit  is  the 
demonstrated  system  reliability.  Orkand  pointed  out  that 
the  technique  could  be  used  even  if  sample  sizes  varied  from 
component  to  component.  At  this  point,  no  computer  program 
for  this  technique  had  been  developed  and  no  techniques 
existed  for  determining  adequate  Monte  Carlo  sample  sizes 
(Ref  23:4,6). 

Since  1963,  graduate  students  at  the  Air  Force  Insti¬ 
tute  of  Technology  have  been  investigating  the  use  of  Monte 
Carlo  techniques  for  estimating  system  reliability.  Their 
research  has  been  performed  under  the  direction  of 
Dr.  Albert  H.  Moore  who  implemented,  improved,  and  broadened 
the  application  of  this  technique  for  obtaining  system 
reliability  confidence  limits  from  component  failure  test 
data.  Of  particular  interest  are  the  research  studies  of 
Bernhoff,  Levy,  Lutton,  Lannon,  and  Putz. 

In  1963,  Bernhoff  demonstrated  that  a  popular  procedure 
of  finding  system  reliability  confidence  limits  was  incorrect. 
The  procedure  was  to  find  the  component  reliability  confi¬ 
dence  limits  for  a  given  confidence  level,  combine  them 
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according  to  the  probability  laws  of  reliability,  and  use 
the  resulting  value  as  the  system  reliability  confidence 
limit  with  the  same  confidence  level  as  that  of  the  compo¬ 
nents.  Bernhoff  found  that  system  reliability  confidence 
limits  and  their  associated  confidence  intervals  could  be 
accurately  determined  from  an  empirical  distribution  of  sys¬ 
tem  reliability  estimates.  This  empirical  distribution  is 
formed  by  combining  the  probability  distribution  functions 
of  component  reliability  estimators.  If  all  of  the  components 
fail  independently  of  one  another,  are  serially  connected, 
and  belong  to  the  same  family  of  failure  distributions,  the 
system  reliability  confidence  limit  can  be  found  analyti¬ 
cally;  however,  if  the  components  are  not  all  independent, 
are  not  serially  connected,  or  if  one  or  more  component 
failure  distributions  belong  to  a  different  family,  mathe¬ 
matical  simulation — specifically,  the  Monte  Carlo  method — 
must  be  used  to  find  the  reliability  confidence  limit  for 
the  system  because  the  analytical  approach  becomes  impracti¬ 
cal  (Ref  3:3,36). 

In  1964,  Levy  coded  this  Monte  Carlo  method  into  a 
computer  program  to  find  system  reliability  confidence  limits 
at  specified  confidence  levels.  He  showed  that  the  Monte 
Carlo  method  can  be  used  to  accurately  predict  a  system's 
reliability  when  the  component  failure  patterns  follow  one 
or  more  of  five  different  probability  distribution  functions: 
exponential,  Weibull,  gamma,  normal,  and  log  normal.  This 
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coded  technique  required  that  the  maximum  likelihood  esti¬ 
mator  values  of  the  distribution  parameters  be  supplied  by 
the  user  and  only  component  reliability  and  system  relia¬ 
bility  estimates  were  generated  by  Monte  Carlo  simulation. 
Levy  found  that  sample  runs  of  100  reliability  values 
resulted  in  system  reliability  estimates  that  differed  by 
less  than  one  percent  from  the  analytically  calculated 
system  reliability  values  (Ref  14:1,12,35-38).  These  find¬ 
ings  were  published  by  Levy  and  Moore  in  1967  (Ref  15). 

During  that  same  year,  Lutton  used  the  asymptotic 
distribution  of  the  parameter  estimators  of  the  Weibull 
(location  parameter  known),  the  gamma  (location  parameter 
known),  and  the  logistic  distributions  to  find  system  relia¬ 
bility  confidence  limits.  In  order  to  use  Lutton 's  computer 
program,  one  still  had  to  supply  the  maximum  likelihood 
estimators  of  the  parameter  values  of  each  compoient's  life 
distribution  as  well  as  the  elements  of  the  variance- 
covariance  matrix.  At  that  time,  asymptotic  variances  and 
covariances  were  tabled  only  for  integer  values  of  the 
shape  parameters  of  the  Weibull  and  gamma  distributions. 
This,  plus  the  number  of  Monte  Carlo  simulations  performed 
and  the  size  of  the  component  samples,  affected  the  accuracy 
of  the  confidence  limits  found  for  system  reliability 
(Ref  17:2,16,28). 

In  1972,  Lannon  developed  a  bivariate  asymptotic 
technique  based  on  Monte  Carlo  simulation  to  find  system 
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reliability  confidence  limits.  The  failure  times  of  each 
system  component  had  a  Weibull  distribution  with  a  known 
location  parameter  and  unknown  shape  and  scale  parameters. 

He  found  that  the  accuracy  of  the  method  increased  as  the 
number  of  system  reliability  simulations  increased  and  as 
the  size  of  sample  component  failure  times  increased. 

Lannon's  computer  program  included  estimation  of  the  maxi¬ 
mum  likelihood  estimators  of  distribution  parameters  and 
the  calculation  of  the  variance-covariance  matrix  elements. 

In  1979,  Putz  used  a  univariate  asymptotic  technique 
to  generate  lower  confidence  limits  and  the  associated 
confidence  interval  coverage  of  the  true  system  reliability. 
Using  components  whose  failure  times  had  a  Weibull  distri¬ 
bution  with  unknown  scale  and  shape  parameters,  he  ran  Monte 
Carlo  simulations  of  system  reliability  for  components  whose 
sample  data  sizes  ranged  from  10  to  100.  He  found  that 
confidence  interval  coverage  improved  as  the  component 
sample  size  increased.  He  concluded  that  the  univariate 
method  works  best  when  the  component  and  system  reliabilities 
are  less  than  0.9.  When  the  reliabilities  are  greater  than 
0.9,  large  component  test  data  sizes  should  be  used  in  the 
estimation  technique.  Putz's  computer  program  included  an 
algorithm  to  find  the  maximum  likelihood  estimators  of  the 
Weibull  distribution  parameters. 

In  1979,  Moore,  Harter,  and  Snead  compared  the  accuracy 
of  the  univariate  and  bivariate  methods  of  estimating  system 
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reliability.  They  concluded  that  the  bivariate  method  was 
more  conservative,  more  accurate,  and  less  sensitive  to 
degradation  due  to  high  system  reliability  than  the  univar¬ 
iate  method.  However,  the  comparison  of  the  two  techniques 
was  not  based  on  each  technique  using  the  same  component 
sample  sizes,  the  same  parameters  for  the  Weibull  distribu¬ 
tion,  the  same  number  of  simulation  runs,  and  more  than  one 
system  network  (Ref  21:9,12).  In  order  to  obtain  a  more 
accurate  comparison  of  these  two  techniques,  this  project 
was  undertaken  to  create  an  experimental  environment  which 
varies  only  the  techniques  involved. 

Problem  Statement  and  Scope 

The  purpose  of  this  study  is  to  compare  a  univariate 
technique  with  a  bivariate  technique  of  predicting  system 
reliability  confidence  limits.  The  univariate  and  bivariate 
techniques  used  were  already  developed  by  past  thesis  stu¬ 
dents,  Putz  and  Lannon  repsectively .  Each  of  these  tech¬ 
niques  is  applied  to  the  same  set  of  components,  systems, 
and  sample  sizes  so  that  only  the  techniques  themselves 
vary.  The  comparison  is  based  upon  the  five  sample  sizes, 
four  systems,  five  components,  seven  confidence  levels,  and 
six  hundred  simulation  runs  used  by  Putz  in  his  research  so 
that  Putz's  results  can  be  used  to  represent  one  case  of 
the  univariate  technique. 
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Assumptions 

The  comparison  of  techniques  has  the  following  seven 
underlying  assumptions: 

1.  Prior  to  the  use  of  these  reliability  prediction 
techniques,  all  system  components  have  been  subjected  to 
reliability  tests.  The  resulting  failure  times  for  each 
component  have  a  Weibull  probability  distribution.  Thus  one 
can  estimate  the  scale,  shape,  and  location  parameters  of 
each  component  failure  distribution. 

2.  The  location  parameter  is  known  or  can  be  set 
equal  to  zero  for  all  Weibull  component  distributions. 

3.  All  system  components  fail  independently  of  one 
another.  This  will  simplify  the  calculation  of  system 
reliability. 

4.  Mission  time  is  100  hours,  an  arbitrary  value. 

5.  Putz  and  Lannon's  computer  programs  accurately 
simulate  the  basic  univariate  and  bivariate  techniques. 

6.  Putz's  thesis  results,  i.e.,  his  confidence  inter¬ 
vals  associated  with  the  lower  confidence  limits,  are  valid 
and  therefore  can  be  used  to  represent  one  case  of  the  uni¬ 
variate  technique. 

7.  Gatliffe's  technique  of  adjusting  for  zero  compo¬ 
nent  failures  is  valid.  This  adjustment  is  applied  to  the 
univariate  cases  in  an  attempt  to  improve  the  accuracy  of 
the  univariate  technique. 
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Assumptions  one  through  four  are  part  of  the  univariate  and 
bivariate  models  used  by  Putz  (Ref  24:7)  and  Lannon  (Ref 
12:4). 

General  Approach 

To  accomplish  the  objective  of  comparing  the  accuracy 
of  the  univariate  and  bivariate  techniques  of  finding  system 
reliability  confidence  limits,  the  following  specific  cases 
of  the  techniques  were  tested  and  compared: 

1.  Putz's  univariate  approach  which  assumes  that 
component  reliability  estimates  are  normally  distributed 
(univariate — normal  technique). 

2.  Putz's  univariate  approach  which  is  modified  to 
assume  that  component  reliability  estimates  have  a  beta 
distribution  (univariate — beta  technique). 

3.  The  above  univariate-normal  technique  with  the  addi¬ 
tion  of  Gatliffe's  method  to  adjust  for  unrealistic  esti¬ 
mates  of  perfect  system  reliability. 

4.  The  bivariate  asymptotic  technique  as  outlined  by 
Lannon  in  his  research  (bivariate  technique). 

Although  both  techniques  calculate  the  lower  confidence 
limits  of  system  reliability  estimates  for  specified  confi¬ 
dence  levels,  the  actual  results  compared  are  the  confidence 
interval  coverages  of  the  true  system  reliability  associated 
with  the  confidence  limits. 


9 


Sequence  of  Presentation 

This  report  begins  in  Section  II  with  a  review  of  the 
major  concepts  of  reliability  theory  and  a  discussion  of 
the  use  of  the  Weibull  distribution  function  as  a  model  of 
component  failure  times.  The  maximum  likelihood  estimation 
of  component  parameters  and  the  general  procedure  of  the 
Monte  Carlo  technique  are  then  presented.  This  is  followed 
by  a  discussion  of  finding  system  confidence  limits  and 
their  associated  confidence  intervals  which  will  be  used 
later  in  the  analysis  of  results.  Then  the  theory  behind 
the  univariate  and  bivariate  methods  of  generating  a  distri¬ 
bution  of  system  reliability  points  is  presented.  Section 
II  concludes  with  a  discussion  of  adjusting  these  methods  in 
the  event  of  perfect  system  reliabilities.  Section  III 
outlines  the  system  networks,  component  distributions,  and 
the  modifications  made  to  the  univariate  and  bivariate 
techniques.  Section  IV  presents  the  results:  the  confidence 
intervals  found  from  each  technique  and  a  comparison  of  them. 
The  conclusions  and  recommendations  in  Section  IV  complete 
this  thesis  presentation. 
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The  main  concepts  underlying  the  univariate  and  bivar¬ 
iate  system  reliability  estimation  techniques  span  several 
branches  of  mathematics  including  calculus,  probability, 
statistics,  and  linear  algebra.  To  prepare  for  the  casual 
use  of  these  mathematical  principles  in  the  discussion  of 
the  two  Monte  Carlo  simulation  techniques,  background  mater¬ 
ial  is  first  presented  on  component  and  system  reliability 
concepts,  the  Weibull  component  failure  distribution  func¬ 
tion  used  in  the  two  techniques,  and  the  method  of  estimating 
parameters  of  the  Weibull  distribution.  Following  this  is 
an  outline  of  the  general  procedures  used  in  estimating  a 
system's  reliability  via  Monte  Carlo  simulation.  A  brief 
review  of  confidence  intervals,  levels,  and  limits  is  also 
presented  before  liberally  using  these  terms  in  the  discus¬ 
sion  of  the  two  techniques.  The  results  obtained  by  Lannon 
and  Putz  as  well  as  the  bivariate  and  univariate  procedures 
themselves  are  then  presented.  This  section  ends  with  the 
logic  Gatliffe  used  to  replace  perfect  system  reliability 
estimates  with  more  realistic  values  in  the  calculation  of 
lower  confidence  limits  of  a  system's  reliability. 

Reliability  of  Systems  and  Components 

Reliability  is  the  probability  that  a  device  will 
operate  satisfactorily  under  specified  environmental  condi¬ 
tions  for  a  given  period  of  time  (Ref  4:28).  Given  a 


MM. 


failure  density  function,  f(t)  ,  and  a  random  failure  time, 

T  ,  of  a  system  or  a  component,  the  probability  of  its 

t 

failure  as  a  function  of  time  is  P(T<t)  =  F(t)  =  /  f(t)dt 

0 

Therefore,  the  reliability  of  the  system  or  component, 

R(t)  ,  is  the  probability  of  success  as  a  function  of  time, 
i.e.,  R(t)  =  P(T>t )  =  l-F(t)  (Ref  27:180).  Since  relia¬ 
bility  is  a  probability,  its  value  is  always  a  real  number 
between  0  and  1. 

In  the  field  of  engineering,  there  are  five  main  ways 
to  help  achieve  the  desired  reliability  of  a  system.  They 
are  the  use  of  (1)  reliability  prediction,  (2)  built-in  test 
equipment,  (3)  debugging  or  burn-in,  (4)  testing  to  destruc¬ 
tion,  and  (5)  selection  of  system  parts  on  the  basis  of 
special  tests.  Methods  two  through  five  are  costly,  and  the 
last  method  has  been  found  to  contribute  very  little  to  the 
final  system  reliability  (Ref  4:3).  Thus,  industry  as  well 
as  the  military  has  focused  on  the  first  method — reliability 
prediction. 

Reliability  estimation  is  the  calculation  of  a  system's 
reliability  based  on  the  reliability  of  its  parts  (Ref  4:3). 
Four  ways  to  estimate  reliability  are  guess  work,  extrapola¬ 
tion,  mathematical  calculation,  and  measurement.  Because 
measurement  is  costly  and  guess  work  and  extrapolation  are 
the  least  accurate,  mathematical  calculation  techniques  are 
of  high  interest  to  anyone  concerned  with  reliability. 
Mathematical  calculation  uses  the  laws  of  reliability 
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theory,  data  from  past  experiments,  and  functional  diagrams 
showing  the  relationship  of  components  in  logical  series  or 
parallel  to  each  other  in  the  system  (Ref  4:208-210).  The 
reliability  of  any  system  can  be  found  by  reducing  the  system 
network  to  a  combination  of  serial  and  parallel  configura¬ 
tions  and  by  using  the  reliability  expressions  for  series 
and  parallel  component  networks  as  shown  in  Figure  1.  As 
the  mathematical  expressions  indicate,  the  system's  relia¬ 
bility  is  dependent  upon  each  component's  reliability.  If 
the  components  are  connected  serially,  the  failure  of  any 
one  of  them  will  cause  the  system  to  fail.  If  the  compo¬ 
nents  are  connected  in  parallel,  the  system  will  fail  only 
if  all  components  fail. 

In  most  studies,  all  system  components  are  assumed  to 
fail  independently  of  one  another.  This  means  that  a  com¬ 
ponent  failure  is  due  to  some  random  event  and  that  it  does 
not  occur  as  a  result  of  the  effects  generated  by  other 
system  component  failures  (Ref  4:85,296).  Not  only  is  this 
assumption  made  in  order  to  use  a  simpler  mathematical 
expression  for  calculating  system  reliability  but  also 
because  system  reliability  is  often  defined  to  be  a  function 
of  relatively  independent  critical  components  rather  than  a 
function  of  all  components.  For  example,  large  Air  Force 
systems  are  often  designed  using  a  system-subsystem  structure. 
Each  subsystem  is  further  divided  into  parts.  If  the  parts 
interact  heavily,  the  reliability  diagram  of  the  system  is 
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complex  and  difficult  to  draw.  In  such  cases,  the  Air  Force 
identifies  critical  components,  i.e.,  single  components  or 
groups  of  components  for  which  one  failure  will  lead  to  an 
inoperative  or  severely  degraded  system.  If  the  definition 
of  component  failures  results  in  little  interaction  among 
the  critical  component  failures,  then  the  system  reliability 
may  be  written  as  the  product  of  independent  component  suc¬ 
cess  probabilities  (Ref  27:140-141). 

Because  a  system’s  reliability  is  a  function  of  its 
components'  reliabilities,  researchers  have  concentrated  on 
finding  component  reliabilities.  No  general  theory  exists 
to  tell  technologists  how  to  calculate  the  reliability  of  a 
single  part  or  component  using  the  basic  physics  of  failure 
of  parts,  i.e.,  the  knowledge  of  how  the  part  was  made 
including  the  materials  and  the  temperature,  pressure, 
humidity,  and  voltage  conditions  used.  For  this  reason, 
component  reliabilities  must  also  be  estimated.  Reliability 
estimates  use  experimental  failure  data  (i.e.,  the  failure 
times  of  items  placed  on  a  life  test)  and/or  the  mean-time- 
between-f ailure  data  from  systems  already  in  operation  (i.e., 
the  operating  hours  of  replaced  parts  in  equipment  already 
in  field  use)  (Ref  27:159-160).  In  both  cases,  a  technolo¬ 
gist  uses  the  failure  data  to  plot  a  histogram.  He  then 
chooses  an  appropriate  failure  distribution  model  based  on 
the  resulting  histogram  and  uses  the  model  to  estimate  the 
parameters  of  the  distribution  (Ref  27:441).  This  thesis 
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assumes  the  distribution  of  the  components  has  already  been 
found  and  is  concerned  with  the  first  type  of  failure  data — 
experimental  failure  data. 

To  collect  experimental  failure  data  for  a  certain 
type  of  component,  a  life  test  of  the  component  is  conducted. 
One  consideration  is  the  component  sample  size,  i.e.,  how 
many  identical  components  to  test.  Life  testing  is  time- 
consuming;  it  may  take  years  before  a  failure  occurs.  The 
smaller  the  component  sample  size,  the  more  time  is  needed 
for  testing  in  order  to  collect  data.  If  on  the  other  hand, 
only  two  or  three  components  are  tested  for  a  short  time , 
too  little  data  will  exist  and  no  accurate  quantitative  con¬ 
clusions  can  be  drawn  about  the  component  and  system's 
reliabilities  regardless  of  how  powerful  a  reliability  cal¬ 
culation  technique  is  used.  This  implies  that  one  should 
increase  the  sample  size  used.  However,  life  testing  is  also 
costly;  the  cost  is  due  to  the  labor  required  to  set  up  a 
controlled  environment  for  the  test  and  sometimes  due  to 
the  price  of  the  components  being  tested  (an  inexpensive 
resistor  or  an  expensive  gyro).  Cost  also  increases  because 
the  data  obtained  will  only  apply  for  the  component  if  it  is 
used  in  that  particular  environment;  another  test  must  be 
conducted  to  see  how  the  component  will  perform  in  a  differ¬ 
ent  environment.  These  cost  considerations  imply  that  it 
would  be  desirable  to  reduce  the  sample  size  used.  Past 
work  in  this  area  has  shown  that  in  order  to  get  the  most 
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information  from  a  testing  situation,  20  to  100  components 
should  be  tested  (Ref  27:441,457).  Thus,  this  thesis  pro¬ 
ject  used  component  sample  sizes  that  usually  are  in  this 
recommended  range. 

Weibull  Distribution 

As  stated  in  Section  I ,  this  research  project  assumes 
that  the  failure  times  of  all  system  components  have  a 
Weibull  density  function.  A  failure  density  function  is  the 
"measure  of  overall  speed  [frequency]  at  which  failures  are 
occurring"  (Ref  27:161).  It  is  also  a  mathematical  descrip¬ 
tion  of  the  length  of  life  of  material,  a  structure,  or  a 
device.  The  particular  family  of  density  functions  chosen 
to  model  an  item  depends  upon  the  relationship  between  the 
function's  failure  rate  and  the  item  whose  life  is  being 
modeled.  The  exponential,  gamma,  Weibull,  modified  extreme 
value,  truncated  normal,  and  log  normal  distributions  have 
all  been  used  to  model  the  fatigue  failure  of  materials  and 
the  life  length  of  electronic  and  mechanical  components 
(Ref  2:9,12). 

In  1939,  a  professor  at  the  Royal  Institute  of  Tech¬ 
nology  in  Sweden  proposed  the  use  of  a  new  distribution 
function  to  describe  the  life  length  of  materials.  This 
professor,  Waloddi  Weibull,  published  an  article  in  1951  in 
which  he  justified  the  use  of  this  new  function.  He  stated 
that  for  the  class  of  failure  distributions  of  the  form 
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F(x)  =  1  -  e-a^x^  ,  the  only  condition  a(x)  must  satisfy 
is  to  be  positive,  nondecreasing,  and  vanishing  at  a  value 
xu  which  is  not  necessarily  equal  to  zero.  The  simplest 
function  that  satisfies  these  three  conditions  is 
(x-xu)m 

o(x)  =  — — -  .  Thus,  the  resulting  failure  distribution 

xo 

function,  now  known  as  the  Weibull  distribution,  is 
Ax-xu>m\ 

F(x)  =  1  -  exp  I  — —  )  (Ref  30:293). 

Like  other  distribution  functions,  the  Weibull  distri¬ 
bution  function  had  no  concrete  theoretical  foundation  but 
was  based  upon  empirical  evidence.  At  that  time,  empirical 
evidence  showed  that  the  Weibull  distribution  often  modeled 
observed  failure  data  better  than  other  known  distribution 
functions.  In  his  article,  Professor  Weibull  give  seven 
specific  examples,  with  supporting  data,  to  demonstrate  the 
wide  applicability  of  this  function.  The  examples  included 
the  yield  strength  of  steel,  the  fiber  strength  of  cotton, 
the  length  of  cyrtoideae,  the  height  of  men,  and  the  breadth 
of  beans.  He  also  argued  that  until  a  better  function  is 
found,  this  empirically  tested  function  should  be  used  since 
it  is  the  simplest  function  for  that  class  of  distributions 
(Ref  30:293-297). 

Historically,  the  rival  function  of  the  Weibull  dis¬ 
tribution  has  been  the  exponential  density  function.  Its 
popularity  is  due  to  both  publicized  empirical  evidence  and 
to  its  simple  form.  In  1951,  Epstein  and  Sobel  published 
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many  important  papers  on  life-testing  which  led  to  widespread 
use  of  the  exponential  distribution  in  life-testing  research. 
In  1952,  D.  J.  Davis  published  a  paper  in  which  he  presented 
the  results  of  goodness-of-f it  tests  for  various  failure 
distributions  for  given  sets  of  failure  data.  The  data  was 
found  to  best  fit  the  exponential  distribution.  Although 
Professor  Weibull  also  published  his  findings  on  using  the 
Weibull  distribution  to  model  fatigue  failure  in  1951,  it 
was  not  until  1959  that  real  interest  in  the  Weibull  func¬ 
tion  grew.  In  that  year,  Zelen  and  Dannemiller  published  a 
paper  showing  that  many  life  test  procedures  based  on  the 
exponential  function  were  not  robust.  Before  1959,  the 
Weibull  distribution  had  been  used  occasionally  to  model, 
e.g.,  ball  bearing  failures  (Lieblein  and  Zelen,  1956)  and 
vacuum  tube  failures  (J.  H.  Kao,  1958)  (Ref  2:3,4,16). 

The  exponential  distribution  is  often  chosen  to  model 
failures  because  it  has  many  desirable  mathematical  proper¬ 
ties.  For  example,  its  use  involves  the  simple  addition  of 
failure  rates  and  a  simple  form  into  which  design  data  can 
be  compiled.  However,  this  distribution  has  limited  applica¬ 
bility  because  of  a  property  it  has  that  leads  to  an  unreal¬ 
istic  representation  of  many  items.  This  property  is  that 
an  item  being  used  never  ages;  no  deterioration  in  perfor¬ 
mance  occurs  before  it  fails.  Therefore,  if  an  item  has 
not  failed  up  to  a  time  t  ,  the  probability  distribution 
of  its  future  life  length  (T-t)  is  the  same  as  if  the  item 
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were  new  and  just  beginning  to  be  used  at  time  t  .  In 
1957,  W.  Feller  showed  that  the  exponential  distribution  is 
the  only  continuous  distribution  with  this  constant  failure 
rate  property  (Ref  2:4,13,14,18). 

Because  most  materials,  structures,  and  devices  wear 
out  with  time,  distributions  with  increasing  failure  rates 
are  of  interest.  Distributions  with  decreasing  failure  rates 
are  also  of  interest  because  of  empirical  observations  that 
show  decreasing  failures  for  a  process.  Two  examples  of 
decreasing  failure  distributions  are  the  work  hardening  of 
certain  materials  and  the  debugging  of  complex  systems 
(Ref  2:18-22).  Although  the  exponential  density  function 
has  a  constant  failure  rate,  it  does  realistically  represent 
some  items  such  as  an  electric  fuse  which  cannot  partially 
melt.  Often  the  exponential  function  is  also  used  to  repre¬ 
sent  component  failure  times  because  of  the  mid-life  descrip¬ 
tion  of  a  "typical"  component.  Early  in  the  life  of  a 
typical  component,  many  failures  are  due  to  initial  weak¬ 
nesses  or  defects  such  as  poor  insulation  or  bad  assembly  in 
the  system.  Late  in  the  life  of  the  component,  many  failures 
are  due  to  the  deterioration  of  the  component.  However,  in 
the  component's  mid-life,  fewer  failures  exist.  The  ones 
that  do  exist  are  often  due  to  environmental  stresses  that 
exceed  the  component's  design  strength.  It  is  difficult  to 
predict  the  environmental  stress  amplitudes  or  the  component 
strengths  as  deterministic  functions  of  time  (Ref  27:170-171). 
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Enough  comparative  analysis  has  not  been  done  on  dif¬ 
ferent  types  of  components  to  label  any  class  of  components 


with  a  particular  failure  distribution.  For  example,  all 
electronic  components  do  not  have  an  exponential  failure 
rate;  technologists  only  know  that  many  do  (Ref  27:172). 
Although  the  exponential  distribution  has  been  a  rival  func¬ 
tion  of  the  Weibull  distribution,  it  is  in  fact  a  special 
case  of  the  Weibull  distribution.  Thus,  using  the  Weibull 
family  of  distribution  functions  to  model  component  failures 
allows  the  modeling  of  increasing,  decreasing,  or  constant 
failure  rates  as  discussed  next. 

The  Weibull  probability  distribution  function  of  a 
random  variable  T  has  three  parameters  and  is  described 
mathematically  as: 


f(t) 


_(tzC)k 

k(t-c)k_1  e  9  ,  0  ,  k>0  and  t>c 


e 


,  elsewhere 


The  mean  value  and  variance  of  this  distribution  are: 


E(t)  =  c  +  er(l+i) 


Var(t)  =  ez[ru+£)  -  r2(i+£)] 


2  X  r.2/1 .1' 


(1) 

(2) 
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The  location  parameter,  c  ,  is  the  point  of  origin  of  the 
distribution,  i.e.,  the  point  in  time,  t  ,  at  which  fail¬ 
ures  begin  to  occur.  The  scale  parameter,  9  ,  represents 


the  characteristic  life  or  spread  of  the  function  about  its 
mean.  The  shape  parameter,  k  ,  represents  the  failure 
rate;  it  can  be  increasing  (k>l),  decreasing  (k<l),  or 
constant  (k=l)  over  time  (Ref  2:13;  24:3;  and  18:184-185). 
When  k=l  ,  the  Weibull  distribution  is  the  exponential 
function;  when  k=2  ,  it  is  the  Rayleigh  distribution;  and, 

when  k=3.5  ,  it  approximates  the  normal  distribution 

(Ref  24:3  and  18:128). 

The  Weibull  distribution  can  be  used  to  model  an 
item  in  which  a  large  number  of  weaknesses  exist  and  whose 
failure  depends  on  its  worst  weakness  if  the  distribution  of 
weaknesses  is  of  the  proper  form.  The  Weibull  distribution 
has  been  used  to  analyze  the  failures  in  electronic  compon¬ 
ents,  semiconductor  devices,  photoconductive  cells,  motors, 
and  capacitors.  It  has  been  used  in  the  study  of  biological 
organisms,  psychological  test  situations,  breaking  strength 
and  fatigue  in  textiles,  corrosion  resistance,  leakage 
failure  of  dry  batteries,  return  of  goods  after  shipment, 
marketing  life  expectancy  of  drugs,  number  of  downtimes  per 
shift,  and  particle-size  data  (Ref  18:185). 

If  a  component  has  failure  times  that  are  patterned 
according  to  the  Weibull  distribution,  its  reliability  can 
be  found  using  the  general  definition  of  reliability  given 
at  the  beginning  of  Section  II.  Thus,  the  component  relia¬ 
bility  is 
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(4) 


R(t)  =  exp(-(^)k) 

This  equation  indicates  that  in  order  to  obtain  a  value  for 
the  component  reliability  R(t)  ,  values  for  t  ,  c  , 

0  ,  and  k  are  needed.  Since  only  component  failure  times, 

t  ,  will  be  available,  the  values  for  c  ,  6  ,  and  k 
will  have  to  be  supplied  if  known  and  estimated  if  unknown. 

Use  of  estimated  parameters  will  make  the  resulting  value 
of  Eq  (4)  an  estimate  also. 

Maximum  Likelihood  Estimation  of  Component  Parameters 

In  general,  there  are  three  mathematical  techniques 
used  to  estimate  the  parameters  of  a  distribution: 

(1)  method  of  least-squares;  (2)  method  of  moments;  and 
(3)  method  of  maximum  likelihood.  The  maximum  likelihood 
technique  is  the  most  flexible  and  most  powerful  of  the 
three  methods  (Ref  27:464).  For  this  reason,  it  has  been 
used  to  estimate  distribution  parameters  by  AFIT  students 
conducting  research  into  the  Monte  Carlo  techniques  for  esti¬ 
mating  system  reliability.  In  particular,  it  has  been  used 
by  Lannon  and  Putz  in  their  separate  work  with  the  Weibull 
distribution.  In  addition,  other  researchers  have  used  it 
in  connection  with  the  Weibull  distribution.  For  example, 
in  1969,  Darrel  Thoman ,  Lee  Bain,  and  Charles  Antle  showed 
that  the  maximum  likelihood  estimators  of  the  three  para¬ 
meters  of  the  Weibull  distribution  are  better  (less  biased  and 
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possess  smaller  variances)  than  other  estimators  of  the 
parameters  (Ref  28:457-458). 

The  maximum  likelihood  estimates  for  the  shape  and 
scale  parameters  (assuming  the  location  parameter  is  known 
or  zero)  of  the  Weibull  distribution  are  found  in  the  stan¬ 
dard  manner  by  finding  the  first  partial  derivatives  of  the 
natural  logarithm  of  the  likelihood  function  with  respect  to 
each  parameter,  setting  each  of  these  derivatives  equal  to 
zero,  and  solving  the  resulting  equations  for  the  two  para¬ 
meters.  The  actual  calculations  and  maximum  likelihood 
estimates  are  as  follows: 


L  =  f(t1)f(t2)...f(tn) 


L  = 


k(t1-c)k-1  -c2p>*  wta-e)*-1  -Hp)k 


e 


e1 


-(^)k 

0k 


r  _  _k^  ,  n  .k-1.  i=l 

L  “  i-n  (  w  (t.-c)  )  e 

0Kn  i=l  1 


J  <¥=»> 
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InL  =  nln  -4-  +  ln(  tt  (t.-c)k  *) 
0K  i=l  x 
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InL  =  nlnk  -  nkln0  +  (k-l)ln(  tt  (t.-c)) 

i=l  1 


-  -4  (  ?  (t,-c)k)  (6) 

0K  i=l  1 
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1  n  t .  c  .  t .  c 
+  4-  Z  (  (—5 — )Kln(— 4 — )  )  (8) 

n  i=l  ©  0 


Because  of  the  complexity  of  the  equation  defining  the  shape 
parameter  estimate,  the  actual  values  of  the  parameters  must 
be  found  simultaneously  in  an  iterative  manner  rather  than 
by  a  single  simultaneous  solution  by  direct  substitution. 

Eqs  (7)  and  (8)  define  the  maximum  likelihood  estimates  of 
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the  shape  and  scale  parameters  when  complete  component  test 
data  is  being  used,  i.e.,  when  a  life  test  is  run  until  all 
components  being  tested  fail  and  t^  represents  the  time  at 
which  the  ith  component  failed  (Ref  22:171). 

In  order  to  save  time  and  cost  during  component 
testing,  censored  test  data  is  often  gathered  rather  than 
complete  test  data.  Censored  test  data  is  gathered  before 
all  components  fail;  it  consists  of  the  failure  times  of  the 
components  that  did  fail  plus  the  running  times  of  the 
components  that  did  not  fail.  There  are  two  types  of  cen¬ 
sored  data,  the  type  depending  upon  the  manner  of  testing. 
Type  I  censoring  of  data  is  performed  by  running  each  com¬ 
ponent  a  prespecified  time  unless  it  fails  sooner.  Thus, 
the  censoring  times  are  fixed,  and  the  number  of  failures  is 
random.  Type  II  censoring  of  data  consists  of  simultaneously 
testing  all  components  until  a  prespecified  number  of  them 
fail.  Thus,  the  number  of  failures  is  fixed  and  the  common 
censoring  time  is  random  (Ref  22:171).  When  censored  data 
is  used,  the  maximum  likelihood  estimates  of  the  parameters 
of  the  Weibull  distribution  are  found  using  only  the  data  for 
the  components  that  failed.  Thus,  the  following  altered  log- 
likelihood  function  (Ref  11:640)  must  be  used: 

L  =  ln(n!)  -  ln(  (n-m)!)  -  ln(r!)  +  (m-r ) ( lnk-klnO ) 
r 

m  m  t.-c  , 

+  (k-1)  Z  ln(t.-c)  -  Z  (-V-)K 
i=r+l  1  i=r+l  0 
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t  -C  , 

-  (n-m)  (— — )k 


+  rln(l-exp(-( 


tr-H-c, 


(9> 


where 

n  =  total  number  of  components  tested 

m-r  =  number  of  components  that  failed 

n-m  =  number  of  components  censored  from  above  once 
the  failure  times  are  ordered 

r  =  number  of  components  censored  from  below  once 
the  failure  times  are  ordered. 

m  =  number  of  failure  times  in  simulated  life  tests 
of  n  components  (m  <  n) 

t.^  =  ordered  component  failure  times  where  i  ranges 
from  r+1  to  m 

The  maximum  likelihood  equations  are  also  found  in  the 
standard  manner  by  setting  the  first  partial  derivatives  of 
L  ,  with  respect  to  the  parameters  0  and  k  ,  equal  to 
zero.  The  resulting  equations  for  the  shape  and  scale 
parameters  (Ref  11:641)  are: 


9Lr  _  -k(m-r)  .  ®  (ti_c)  k(n-m)(tm~c) 

99  "  9  i=r+l  6k+l  ek+l 
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tm-c  ,  t  -c 
(n-m)(-L)kln(-4— ) 


9 


27 


k  ^r+l~ C  ^r+1  C  k  k 

+  r(tr+i-c)Kln(-r-^ . )exp(-(-  ^  -)K)/8K{1 

^r+l  — k 

-  exp(-(-^-)K)}  (11) 

The  corresponding  equations  for  the  complete  test  data  situ¬ 
ation  are  a  special  case  of  these  equations.  That  is,  if  no 
component  data  is  censored,  then  r=0  and  m=n  and  the 
above  equations  collapse  to  form  Eqs  (7)  and  (8). 

Eqs  (7)  and  (8)  for  the  complete  test  data  case  are 
used  in  developing  the  univariate  technique  for  estimating 
system  reliability,  and  Eqs  (10)  and  (11)  for  the  censored 
test  data  case  are  used  in  developing  the  bivariate  tech¬ 
nique  for  estimating  system  reliability.  Eqs  (10)  and  (11) 
are  used  in  the  latter  case  to  achieve  flexibility,  i.e., 
to  enable  the  bivariate  technique  to  handle  either  type  of 
test  data.  Even  though  Eqs  (10)  and  (11)  are  used  in  the 
bivariate  technique,  they  will  in  essence  collapse  and 
become  Eqs  (7)  and  (8)  for  this  thesis  application. 

Monte  Carlo  Techniques  of  Generating  System  Reliabilities 

The  general  procedure  followed  in  any  Monte  Carlo 
technique  of  estimating  the  lower  confidence  limit  of  system 
reliability  consists  of  steps  similar  to  the  seven  steps 
listed  below: 

1.  For  each  component,  generate  a  sample  of  component 

failure  times  using  the  component's  distribution,  f(t)  , 
and  the  associated  true  parameters. 


2.  For  each  component,  use  the  simulated  component 
failure  times  to  find  the  maximum  likelihood  estimates  of 
the  unknown  parameters  of  the  component's  distribution. 

3.  For  each  component,  generate  a  point  estimate  of 
the  component  reliability  by  substituting  the  known  para¬ 
meter  values  and  the  maximum  likelihood  estimates  of  the 
unknown  parameters  into  the  component  reliability  equation 
R(t)  =  1  -  F(t)  .  Go  to  Step  5. 

4.  For  each  component,  generate  a  point  estimate  of 
the  component  reliability  by  substituting  the  known  para¬ 
meter  values  and  new  estimates  of  the  unknown  parameters 
into  the  component  reliability  equation  R(t)  =  1  -  F(t) 
Generate  these  new  parameter  estimates  by  using  the  maximum 
likelihood  estimates  and  their  assumed  distribution. 

5.  Calculate  a  system  reliability  point  estimate  by 
substituting  the  component  reliability  point  estimates  into 
the  reliability  expression  for  the  system  network. 

6.  Repeat  Steps  4  and  5  until  the  desired  number  of 
system  reliability  estimates  is  obtained. 

7.  Order  the  system  reliability  point  estimates  by 
increasing  magnitude.  The  ordered  points  form  a  step  cumu¬ 
lative  distribution  of  system  reliability  estimates  with 
each  step  equal  to  1/n  where  n  is  the  total  number  of 
system  reliability  estimates  found.  Find  the  100(l-«) 
percent  lower  confidence  limit,  where  «  is  the  desired 


significance  level.  It  will  be  the  value  of  the  system 


reliability  point  estimate  that  corresponds  to  the  lower 
limit  percentage  point.  For  example,  the  lower  confidence 
limit  for  a  95  percent  confidence  level  is  the  point  esti¬ 
mate  at  the  5  percent  point  of  the  ordered  values  (Ref  3:44). 

In  order  to  check  the  accuracy  of  the  particular 
Monte  Carlo  estimation  technique,  three  extra  steps  are 
added  to  the  process.  They  are: 

8.  Calculate  the  true  system  reliability  using  the 
true  component  reliabilities  plus  the  system  reliability 
expression  for  the  network.  The  true  reliability  of  each 
component  is  found  by  substituting  the  component's  known 
parameter  values  into  its  known  distribution.  The  estimated 
lower  confidence  limit  found  in  Step  7  is  compared  to  the 
true  system  reliability  to  see  if  the  100(1-®)  percent 
confidence  interval  contains  the  true  system  reliability. 

9.  Repeat  Steps  1  to  8  until  the  desired  number  of 
Monte  Carlo  simulations  is  reached. 

10.  Find  the  percentage  of  runs  in  which  the  confi¬ 
dence  intervals  cover  the  true  system  reliability.  This 
percentage  should  be  close  to  100(1-®)  percent  if  the 
technique  is  accurate. 

Once  such  a  Monte  Carlo  technique  is  found  to  be  within 
a  desired  accuracy,  it  can  be  used  to  find  the  lower  confi¬ 
dence  limit  of  an  actual  system's  reliability.  However, 
each  component's  distribution  must  be  found  using  the  actual 
component  test  data  via  some  other  method  prior  to  using 


this  technique.  Once  each  component's  distribution  is  known, 
the  actual  component  failure  data  from  component  testing 
would  be  input  into  Step  2  to  estimate  the  unknown  parameters 
of  the  component's  distribution.  One  can  then  find  the 
lower  confidence  limit  of  system  reliability  for  a  given 
significance  level  using  Steps  3  through  7. 

Confidence  Levels ,  Limits  and  Intervals 

Throughout  the  presentation  of  Monte  Carlo  techniques, 
three  "confidence"  terms  are  used  in  connection  with  the 
distribution  of  the  estimated  system  reliability  points: 
confidence  level,  confidence  limit,  and  confidence  interval. 
The  confidence  level,  or  confidence  coefficient,  is  the 
degree  that  a  given  hypothesis  is  true  within  a  specified 
limit(s).  It  can  also  be  thought  of  as  the  number  of  times 
out  of  a  given  number  of  trials  that  an  event  is  expected  to 
occur  (Ref  4:96,297).  A  confidence  level  is  usually  associ¬ 
ated  with  an  estimate  in  order  to  attach  a  degree  of  cer¬ 
tainty  to  the  precision  of  the  estimate.  The  confidence 
level  may  be  expressed  as  a  probability  l-<*  where  ®  is 
a  given  significance  level,  or  it  may  be  expressed  as  a 
percentage  100(l-«) 

There  are  two  confidence  limits:  upper  and  lower. 

The  upper  and  lower  confidence  limits  are  the  maximum  and 
minimum  limits  respectively  that  define  the  range  within 
which  observations  can  be  expected  to  occur  with  a  specified 
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degree  of  certainty  (confidence  level)  (Ref  4:297).  The 
range  defined  by  the  upper  and/or  lower  confidence  limits 
is  called  the  confidence  interval  (Ref  19:274).  Figure  2 
shows  a  distribution  of  a  random  variable  R  plus  a  two- 
sided  confidence  interval  (Cl)  for  R  defined  by  the  upper 
and  lower  confidence  limits  R^  and  RL  respectively,  i.e., 
Cl  =  (R^,Ry)  .  The  confidence  level  1-®  is  expressed  as 

P(Rl<R<Ru)  =  l-<*  and  is  the  area  under  the  curve  enclosed 
by  Rl  and  Ry 

In  this  thesis,  one-sided  confidence  intervals  are  of 
interest  since  the  estimation  techniques  will  be  finding 
only  the  lower  confidence  limit  of  system  reliability.  Thus 
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Fig  3.  One-Sided  Confidence  Interval 


for  a  given  confidence  level  1-®  ,  the  Monte  Carlo  tech¬ 
niques  will  estimate  the  lower  confidence  limit  of 

system  reliability  R  and  then  find  P(R>RL)  ,  i.e., 
l_<x*  such  that  P(R>R^)  =  1-®*  .  if  the  technique  is 

accurate,  1-®*  will  be  close  in  value  to  1-®  .  The 

implied  confidence  interval  is  (RL,1)  where  1  rather 
than  00  is  the  upper  bound  of  the  interval  because  that  is 
the  maximum  possible  value  of  reliability.  This  one-sided 
confidence  interval  is  illustrated  in  Figure  3  for  a  95  per¬ 
cent  confidence  level. 
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Bivariate  Technique 

In  1972,  Robert  Lannon  developed  a  bivariate  Monte 
Carlo  technique  to  estimate  the  lower  confidence  limit  of 
a  system's  reliability  when  the  component  failure  times  have 
a  Weibull  distribution.  He  assumed  that  one  parameter  of 
this  distribution,  namely  the  location  parameter,  was  known 
or  equal  to  zero.  The  technique  is  called  bivariate  (two 
variables)  not  because  the  other  two  parameters  of  the  Weibull 
distribution  are  unknown  and  must  be  estimated  but  because 

A 

the  component  reliability  estimate  R(t)  is  a  function  of 
the  estimates  of  these  two  unknown  parameters. 

Lannon 's  bivariate  method  parallels  the  general  seven 
step  Monte  Carlo  procedure  for  finding  the  system  reliability 
confidence  limits  for  a  given  confidence  level.  To  use  the 
bivariate  technique,  perform  the  following  eight  steps 
(Ref  12:7,8,15,51): 

1.  Generate  random  failure  times  for  each  system 
component  using  the  known  parameter  values  and  the  Weibull 
distribution  function. 

2.  For  each  component,  compute  the  maximum  likelihood 
estimates  of  the  component's  shape  and  scale  parameters. 

3.  Find  the  variance-covariance  matrix  of  the 
asymptotic  normal  distribution  of  the  shape  and  scale  para¬ 
meters  for  each  component. 

4.  Generate  a  sample  estimate  of  the  component's 
shape  parameter  and  a  sample  estimate  of  the  component's 
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scale  parameter  using  the  maximum  likelihood  estimates  as 
means  of  the  bivariate  normal  distribution  and  the  variance- 
covariance  matrix  elements  to  find  the  standard  deviations 
of  the  sample  estimates. 

5.  For  each  system  component,  calculate  a  point  esti¬ 
mate  of  the  component  reliability  by  inserting  the  known 
location  parameter  and  the  sample  estimates  of  the  shape 
and  scale  parameters  found  in  Step  4  into  the  reliability 
equation  for  the  Weibull  density  function,  i.e.,  Eq  (4). 

6.  Calculate  a  point  estimate  of  the  system  relia¬ 
bility  by  inserting  the  component  reliability  point  esti¬ 
mates  into  the  system  reliability  equation.  The  system 
reliability  equation  is  found  by  using  probability  laws  for 
the  reliability  of  independent  components  based  on  the  sys¬ 
tem  design. 

7.  Repeat  Steps  4  to  6  until  the  desired  number  of 
system  reliability  estimates  is  obtained. 

8.  Order  the  system  reliability  points  in  increasing 
magnitude  to  form  the  cumulative  system  reliability  distri¬ 
bution.  Find  the  desired  confidence  limit  for  a  given  con¬ 
fidence  level  100(1-*)  by  selecting  the  100(*)  percent 
ordered  sample  system  reliability  point. 

The  first  four  of  these  eight  steps  make  this  Monte  Carlo 
technique  bivariate  and  for  use  with  components  whose  failure 
times  follow  a  Weibull  distribution.  Because  of  this,  the 
theory  behind  each  of  these  four  steps  is  presented  next. 
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In  step  one,  it  is  assumed  that  the  number  of  sample 
failure  times  is  determined  a  priori  and  may  vary  from  one 
component  to  the  next.  The  inverse  relation  of  the  Weibull 
cumulative  distribution  function  is  used  to  generate  the 
component  failure  times.  The  Weibull  cumulative  distribution 
function  is 

F(t)  =  1  -  exp[-(^)k]  (12) 

Setting  this  function  equal  to  variable  Y  ,  the  inverse 
relation  can  be  found  and  is 

t  =  0(-ln(l-Y))1/k  +  c  (13) 

Because  F(t)  ,  and  thus  Y  ,  belongs  to  the  interval 
[0.0,  1.0)  ,  pseudo-random  numbers  from  a  uniform  distri¬ 

bution  are  generated  for  Y  .  Using  the  known  values  of 
the  component  parameters  0  ,  k  ,  and  c  ,  random  Weibull 
values,  t  ,  are  calculated  for  each  component  (Ref  12:7,51). 
The  individual  component  failure  times  are  ordered  and  used 
by  a  parameter  estimation  routine  in  step  two. 

The  parameter  estimation  routine  (PARES)  computes 
the  maximum  likelihood  estimates  of  the  component  shape  and 
scale  parameters.  The  actual  subroutine  used  is  an  itera¬ 
tive  procedure  developed  by  Harter  and  Moore  and  can  be 
used  to  estimate  all  three  parameters  of  the  Weibull  distri¬ 
bution  for  complete  or  censored  samples  (Ref  11).  The  pro¬ 
cedure  uses  the  natural  logarithm  of  the  likelihood  function 
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of  all  ordered  failure  times  remaining  after  the  sample  is 
censored.  That  is,  the  procedure  uses  Eq  (9).  The  maximum 
likelihood  equations  for  each  of  the  three  parameters  are 


found  by  taking  the  partial  derivatives  of  Lr  with  respect 
to  each  parameter.  These  three  equations  are  set  equal  to 
zero  and  are  solved  simultaneously  via  an  iterative  proce¬ 
dure  which  uses  the  actual  parameter  values  as  the  initial 
estimates  for  the  parameters,  zero  as  the  initial  estimate 
for  r  ,  and  the  rule  of  false  position  (i.e.,  iterative 
linear  interpolation)  to  find  the  maximum  likelihood  esti¬ 
mates.  The  three  parameters  are  estimated  iteratively  in 
the  following  order:  0  ,  k  ,  and  then  c  (Ref  11:641). 

Linear  interpolation  is  used  to  find  the  value  of  the 
parameter  being  estimated  at  any  given  step  that  satisfies 
the  appropriate  likelihood  equation  into  which  the  latest 
estimates  or  known  values  of  the  other  two  parameters  have 

A  A 

been  substituted.  Positive  values  of  9  and  k  can  always 


be  found  this  way.  If  no  value  in  the  interval  (O.t-^) 
exists  to  satisfy  the  likelihood  equation  for  c  ,  then  the 
likelihood  function  in  this  interval  is  either  decreasing 
monotonically  (and  thus  c=0  )  or  increasing  monotonically 

(and  thus  c=t  ,  when  k<l  )  and  this  iterative  estimation 
procedure  cannot  continue  unless  the  procedure  is  modified. 


Harter  and  Moore  state  that  a  possible  modification  is  to 
cen^l?*^4he  smallest  ordered  failure  time  plus  any  other 


failure  times 


The  variable  r  is  set  equal 


to  the  total  number  of  censored  failure  times.  The  itera¬ 
tive  procedure  can  then  continue  until  the  results  of  the 
successive  steps  agree  to  within  an  assigned  tolerance  value 
(Ref  11:641).  No  modification  to  this  iterative  routine  is 
needed  in  the  bivariate  method.  Only  the  shape  and  scale 
parameter  estimates  generated  in  this  iterative  routine  are 

I 

used  since  the  location  parameter  is  assumed  to  be  known  in* 
the  bivariate  procedure. 

The  next  step  in  the  bivariate  technique  is  to  find 
the  variance-covariance  matrix  of  the  asymptotic  normal 
distribution  of  the  shape  and  scale  parameters.  Maximum 
likelihood  equations  can  be  used  to  approximate  the  values 
of  the  variances  and  covariances  for  two  or  more  estimated 
distribution  parameters.  The  general  procedure  is  to  cal¬ 
culate  the  second  partial  derivatives  of  the  natural  logarithm 
of  the  likelihood  function  L  and  form  a  matrix  S  .  If 
any  of  the  second  partial  derivatives  have  involved  quanti¬ 
ties  such  as  a  summation,  the  quantities  should  be  replaced 
by  their  expected  values.  In  the  case  of  two  parameters, 

6  and  k  ,  the  matrix  is 

(14) 

A  A 

The  variance-covariance  matrix  V  of  0  and  k  will  be 
the  negative  inverse  matrix  of  S  ,  i.e., 


S  = 


Lee  L0k 


L0k  Lkk 
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(15) 


p* 


Var( 8 )  Cov( 8 , k) 

Cov(8,k)  Var(k) 

These  values  in  the  variance-covariance  matrix  are  valid  only 
for  large  component  sample  sizes.  For  the  Weibull  distri¬ 
bution,  an  unknown  amount  of  error  exists  in  these  values 
due  to  estimator  bias.  However,  this  bias  disappears  as  the 
sample  size  increases.  That  is,  a  minimum  attainable  value 
for  the  variance  of  an  estimator  exists;  the  variances  of 
the  maximum  likelihood  estimators  approach  this  minimum 
value  as  n  increases  toward  infinity.  The  result  of  using 
these  values  when  the  component  sample  size  is  small  is  to 
underestimate  the  variances  (Ref  16:174-177). 

In  1967,  Harter  and  Moore  showed  that  the  shape  and 
scale  estimators  of  the  Weibull  distribution  are  asymptoti¬ 
cally  unbiased,  asymptotically  of  minimum  variance,  and 
asymptotically  bivariate  normal  (Ref  10:561).  They  also 
discussed  how  to  find  the  maximum  likelihood  information 
matrix  and  the  variance-covariance  matrix  of  the  asymptotic 
normal  distribution  of  the  shape  and  scale  parameters.  The 
procedure  begins  with  the  natural  logarithm  of  the  likeli¬ 
hood  function  given  in  Eq  (9).  If  the  sample  is  complete 
(not  censored),  the  elements  of  the  information  matrix  are 
the  limits  as  n  approaches  infinity  of  the  negatives  of 
the  expected  values  of  the  second  partial  derivatives  of  the 
likelihood  function  with  respect  to  each  of  the  parameters 
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(Ref  10:558-559).  If  the  sample  is  censored,  these  limits 
mentioned  do  not  exist;  the  elements  of  the  information 
matrix  are  the  limits  in  probability  of  the  conditional 
expectations  (Ref  10:561). 

The  elements  of  the  information  matrix  for  the  shape 
and  scale  parameter  estimates  are: 

S11  S12 
S21  S22 


klln 


k21n 


k12n 


e 

nk 


22 


(16) 


where  the  values  of  k . .  are  given  by  Harter  and  Moore  as: 

1 J 

kn  "  £  pr  E 

-  -kp  +  k(k+l)  tr(2;SjJ)  -  r(2;zj+1>]  +  k(k+l)q2  z 


zr*lf(zr+l>(kzr+l 


-  (k+l)q-i3 


(17) 


k12  =  k21 


lim  pr  E  [-C-£)(^jj)l 
n-*-“ 


=  P  -  tr"(2;z")  -  r'(2;zj+1)l  -  [r(2;z£) 
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3  X 


A  „  -  A 

zr+lf(5W 


-  r(2;z^+1)]  -  q2z^(klnzm  +  D  - 


{kzj+1lnzr+1  -  (klnzr+1  +  Dq^  (18) 


k22  =  lim  pr  E  =  p- 

n-*-® 


IT"  (2;  zk)  -  r-(2;zr+1)] 


J“ - —  +  q_Skln2zm 

1,2  ^2  rn  m 


A  -  ,  A  v 

Vu'^r+l5 


{m2zr+i[zk+i  -  qxl>  (19) 


where  z^  = 


,  _  (m-r) 

~ Q—  •  P  =  - E“ 


f(z±)  =  kzk  1exp(-z^)  ,  qx  =  ~  >  Q2  =  »  T(a;b) 

is  the  incomplete  gamma  function,  T'  and  T"  are  the 
first  and  second  derivatives  of  the  gamma  function  respec¬ 
tively.  Holding  qx  and  q2  fixed  and  letting  n+<»  , 

zr+-^  converges  in  probability  to  ^-p+i  where  F(zr+^)  = 

a 

Z  4-T 

/  r  xf(t)dt  =  q1  ,  and  zffl  converges  in  probability  to 

z  where  1-F(z  )  =  /  f(t)dt  =  q2  (Ref  12:12-13;  10:558- 
m  m  z_  ^ 


559) 


It  should  be  noted  that  n  ,  0  ,  and  8 2  are  used 

to  facilitate  finding  the  limits  and  to  make  the  equations 
easier  to  handle.  Since  n  and  0  are  constants,  the 
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constant  factors  multiplied  by  the  values  of  k. .  in  the 
information  matrix  may  be  temporarily  removed  in  order  to 
make  inverting  the  information  matrix  easier.  The  constant 
factors  can  be  inverted  and  multiplied  by  the  corresponding 
elements  of  the  inverted  information  matrix  in  order  to 
produce  the  variance-covariance  matrix  V  .  Thus,  letting 


A 


all  a12 
a21  a22 

kll  k12 
k21  k22 


the  elements  of 


V  are  (Ref  12:4) 

V  = 


V11 

N 

rH 

> 

V21 

V22  J 

all9 

2  a 
a12 

n 

n 

a219 

a22 

n 


(20) 


(21) 


Lannon's  computer  program  finds  the  values  of  the 

variance-covariance  matrix  by  computing  the  values  of  k.  . 

—  J 

inverting  them,  and  then  multiplying  the  inverted  matrix 
elements  by  the  appropriate  constant  factors.  This  program 
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is  used  for  both  complete  and  censored  samples  since  a 
complete  sample  is  just  a  censored  sample  with  zero  samples 
censored  above  (n-m=0  and  thus  q2=0)  and  ^e-*-ow  (r=0 

and  thus  q1=0) 

After  Steps  1,  2,  and  3  are  done  for  each  system  com¬ 
ponent,  the  bivariate  method  continues  with  Step  4  by  gen¬ 
erating  a  sample  of  the  component  shape  parameter  and  a 
sample  of  the  component  scale  parameter.  In  order  to  do 
this,  the  maximum  likelihood  estimates  of  9  and  k  are 
used  as  the  means  of  the  bivariate  normal  distribution  of 

the  shape  and  scale  parameter  estimates.  Using  the  fact 

Y-u 

that  the  statistic  Z  =  has  a  standard  normal  distri¬ 

bution  if  Y  is  an  independent  normally  distributed  random 
variable  with  mean  y  and  standard  deviation  o  , 

Y  =  aZ  +  y  where  Y  represents  a  random  sample  of  each  of 
the  two  parameter  estimates.  Thus,  the  random  samples  can 
be  found  using  (Ref  12:10-12): 

Y  =  V*Z  +  M  (22) 

where 

Y  =  2x1  vector  containing  the  two  random  samples  of 

the  shape  and  scale  parameter  estimates 

V  =  2x2  asymptotic  variance-covariance  matrix  which 

is  symmetric 

Z  =  2x1  vector  containing  two  pseudo-random  numbers 
from  the  standard  normal  distribution 

m  =  2x1  vector  containing  the  two  maximum  likelihood 
estimates  of  the  shape  and  scale  parameters 


Once  the  sample  parameter  estimates  are  obtained,  the 
bivariate  procedure  then  continues  with  Steps  5  through  8 
as  already  described. 

Lannon  analyzed  two  systems  over  a  mission  run  time 
of  75  hours.  One  system  consisted  of  one  component  in 
series  with  two  parallel  components,  and  the  other  system 
was  a  more  complex  eight-component  network.  The  size  of 
sample  data  varied  among  components;  and,  some  component 
data  were  censored  and  some  were  not.  Lannon  found  the  lower 
confidence  limit  on  the  system  reliability  for  four  different 
sizes  of  simulated  system  reliability  point  estimates  (99, 
499,  999,  and  2999)  at  eleven  various  confidence  levels 
(99%,  98%,  97%,  96%,  95%,  90%,  85%,  80%,  70%,  60%,  and  50%). 
Because  each  simulation  run  was  a  random  sample  of  system 
reliability  points  for  only  one  Monte  Carlo  run,  Lannon 
pointed  out  that  no  conclusion  could  be  drawn  as  to  trends 
of  these  lower  confidence  limits  as  the  number  of  points 
increased.  He  could  only  state  that  the  lower  confidence 
limit  for  a  2999-point  simulation  had  to  be  mathematically 
more  accurate  than  that  for  a  99-point  simulation  (Ref  12: 
22-25). 

It  should  be  noted  that  all  component  reliability 
estimates  belong  to  the  half  open  interval  [0,1)  :  no 
component  reliability  estimate  of  value  one  will  ever  be 
generated.  An  examination  of  Eq  (4),  which  is  used  to 
generate  all  component  reliability  estimates,  indicates 
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that  the  only  way  a  component  reliability  estimate  could 

A 

have  a  value  of  one  is  for  (t-c)  to  equal  zero  or  for  0 
to  approach  infinity.  However,  the  quantity  (t-c)  has  a 
constant  value  of  100  since  t  has  a  value  of  100  and  c 
has  a  value  of  0.  Also,  the  parameter  0  will  never  have 
an  estimated  value  that  approaches  infinity  due  to  the  condi¬ 
tions  imposed  in  the  parameter  estimation  routine  PARES. 

Thus,  because  no  component  reliability  estimates  will  ever 
equal  one  in  value,  no  system  reliability  estimate  will  ever 
equal  one  in  value.  Therefore,  Lannon  simulated  99,  499, 

999,  and  2999  system  reliability  point  estimates  instead  of 
100,  500,  1000,  and  3000  estimates  respectively  because  the 
upper  reliability  bound  of  one  will,  with  the  highest 
ordered  estimated  reliability  point,  form  the  100th,  500th, 
1000th,  or  3000th  interval  of  the  reliability  range  when 
finding  the  lower  reliability  limit  in  Step  8  of  the  bivar¬ 
iate  technique. 

Lannon  alludes  to  the  fact  that  he  conducted  a  brief 
check  of  the  accuracy  of  the  confidence  level  (Ref  12:25) 
by  finding  confidence  interval  coverage  of  the  true  system 
reliability  as  outlined  in  Steps  8  through  10  of  the  general 
Monte  Carlo  technique.  He  did  this  for  a  Monte  Carlo  size 
of  100  runs  on  both  systems,  generating  99  system  relia¬ 
bility  point  estimates  for  each  run.  He  found  the  confidence 
level  to  be  reasonably  accurate  for  this  least  accurate  case 
of  100  Monte  Carlo  runs  and  this  smallest  number  of 
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simulation  points  (Ref  12:26).  He  continued  his  accuracy 
check  by  performing  300  and  then  700  Monte  Carlo  runs  on 
his  simple  three-component  system  for  the  99-point  case. 

He  found  that,  in  general,  each  calculated  confidence  inter¬ 
val  was  wider  than  required,  i.e.,  it  covered  the  true  sys¬ 
tem  reliability  more  often  than  required  by  the  given 
confidence  level.  If  the  calculated  coverage  was  below  the 
required  coverage,  the  calculated  coverage  approached  the 
required  coverage  and  surpassed  it  when  more  runs  were  made. 
If  the  calculated  coverage  was  above  the  required  coverage, 
then  the  calculated  coverage  approached  the  required  cover¬ 
age  as  more  runs  were  made  (Ref  12:28-29).  Lannon  concluded 
that  as  the  size  of  component  failure  data  increases  and  as 
the  number  of  simulated  reliability  points  increases  so 
does  the  accuracy  of  the  calculated  confidence  interval 
(Ref  12:30). 

Univariate  Technique 

In  1979,  Randall  Putz  developed  a  univariate  Monte 
Carlo  technique  to  estimate  the  lower  confidence  limit  of  a 
system's  reliability  when  the  component  failure  times  have 
a  Weibull  distribution  with  location  parameter  c  known  or 
equal  to  zero.  Putz's  technique  is  a  univariate  or  one- 
variable  technique  even  though  the  other  two  parameters  of 
the  Weibull  distribution,  8  and  k  ,  are  unknown  and  must 
be  estimated  for  each  system  component.  The  single  variable 
used  in  this  technique  is  R(t)  ,  the  true  component 
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reliability.  The  distribution  of  the  component  reliability 
estimate,  R(t)  ,  depends  only  on  the  one  variable  R(t) 

Thus  R(t)  does  not  depend  directly  on  the  failure  times, 
t  ,  or  the  maximum  likelihood  estimates  of  the  unknown 
parameters,  0  and  k  ,'  i.e.,  it  depends  on  them  only 
indirectly  through  the  expression  for  R(t)  .  Putz  used 
this  fact  in  Step  3  of  the  general  Monte  Carlo  technique 
when  generating  a  sample  point  estimate  of  the  component's 
reliability . 

This  fact  was  discovered  by  Darrell  Thoman,  Lee  Bain, 
and  Charles  Antle  in  their  studies  of  the  Weibull  probability 
distribution  and  the  maximum  likelihood  estimates  of  the 
Weibull  parameters.  In  a  paper  published  in  1970,  they 
showed  that  for  a  given  component  sample  size  n  ,  the 
distribution  of  R(t)  depends  only  upon  the  component's 
true  reliability  R(t)  (Ref  29:364).  This  allowed  them  to 
study  the  distribution  of  R(t)  empirically  and  to  generate 
a  table  of  biases  for  R(t)  from  the  empirical  distribution. 
The  bias  value  is  tabled  by  component  sample  size  n  and 
by  the  true  component  reliability  R(t)  .  They  found  the 
biases  to  be  very  small  (most  biases  were  in  the  range  0.000 
to  0.006;  only  for  8sn<15  was  the  bias  larger,  the  largest 
value  being  0.015)  and  not  worth  trying  to  eliminate  (Ref  29: 
365).  Thus,  R(t)  is  close  to  being  an  unbiased  estimator 
of  R(t)  . 
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This  three-man  team  also  generated  a  table  of  vari¬ 
ances  for  R(t)  and  showed  that  R(t)  has  a  variance  that 
is  almost  equal  to  the  Cramer-Rao  Lower  Bound  (CRLB),  i.e., 
the  lower  bound  of  the  variance  of  the  unbiased  estimator 


of 

R(t) 

(Ref 

29:365-366). 

In  order 

to  compare  variances 

of 

R(t) 

with 

the  CRLBs  for 

R(t)  , 

they  generated  values 

for  the  CRLB  by  first  showing  that  the  CRLB  is  also  a 
function  of  R(t)  and  n  .  They  used  the  fact  that  the 
asymptotic  variance  of  R(t)  is  the  CRLB  (since  the  bias  of 
R(t)  goes  to  zero  as  n  increases,  R(t)  becomes  an 
unbiased  estimator  of  R(t)  as  n  increases).  The  equa¬ 
tion  for  the  CRLB  is 


CRLB  =  a*  rff  ] 2 


0 


q _  SR  SR  . 
0,k  39  3k 


r2  [— ]  2 
C  Sk 


(23) 


where  a2  ,  a;  f  ,  and  ai  are  elements  of  the  asymptotic 
9  o ,  k  k 

covariance  matrix  of  (§,£)  .  Then  they  substituted  into 

Eq  (23)  the  asymptotic  covariance  matrix  element  values 

which  they  found  in  a  previous  study  of  theirs  (Ref  28:449) 

to  be  ai  =  1.  lO902/(nk2 )  ,  cr2  =  0.608k2/n  ,  and 

0  k 

cu  £  =  0.2570/n  .  This  resulted  in  the  CRLB  being  a  func- 

0 ,  k 

tion  of  R(t)  and  n  ,  i.e.. 


CRLB  =  R2 ( In  R)2  {1.109-0.514  ln(-ln  R) 


+  . 608( ln( -In  R))2}/n  (24) 
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After  tabulating  values  of  the  CRLBs  of  R(t)  and  variances 
of  R(t)  for  27  casts,  Thoman,  Bain,  and  Antle  found  that 
the  variance  of  R(t)  was  always  greater  than  the  CRLB  for 
low  component  sample  sizes  and  low  R(t)  values  but  equalled 
the  CRLB  as  n  increased  and  as  R(t)  increased  (Ref  29: 
366).  They  concluded  that  for  large  n  ,  one  can  assume 
that  R(t)  is  normally  distributed  with  mean  R(t)  and 
variance  equal  to  the  CRLB  in  order  to  obtain  confidence 
limits  for  R(t)  (Ref  29:366).  Therefore,  by  showing  that 

A 

R(t)  is  approximately  a  minimum  variance  unbiased  esti¬ 
mator  of  R(t)  ,  Thoman,  Bain,  and  Antle  showed  that  R(t) 
is  a  very  good  estimator  of  R(t)  (Ref  29  363-366). 

Although  Thoman  ,  Bain  ,  and  Antle  felt  that  the  bias 
of  R(t)  was  not  worth  removing,  Putz  did  remove  it  in  his 
univariate  technique  in  an  attempt  to  be  as  accurate  as 
possible.  He  used  a  table  of  biases  for  R(t)  generated  by 
David  Antoon  (Ref  1:44)  because  Antoon's  tabled  values  had 
a  larger  number  of  significant  digits  than  those  of  the 
three-man  team  (Ref  24:15,37).  Putz  also  used  Antoon's 
tabled  standard  deviation  values  of  ft(t)  for  the  same 
reason.  Antoon  generated  the  biases  and  the  variances  (and 
thus  the  standard  deviations  since  standard  deviation  equals 
the  square  root  of  the  variance)  via  a  Monte  Carlo  simulation 
procedure  similar  to  that  used  by  Thoman,  Bain,  and  Antle. 

The  standard  equation  bias  =  E(R(t))-R(t)  was  used  to  find 
the  biases,  and  the  equation  used  to  find  the  variance  was 
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w 


Var [R(t ) ] 


?  [E(ft(t))-R(t)32 
I,  M-l 


where  M  is  the  number  of  Monte  Carlo  runs  and  thus  the 
number  of  sample  points  in  the  R(t)  distribution  (Ref  1: 
143-144).  Because  Antoon  used  2000  sample  points  (Ref  1:143) 
and  Thoman,  Bain,  and  Antle  imply  that  they  used  10,000 
points  (Ref  29:366)  to  generate  the  tabled  values,  Putz 
compared  the  tabled  values  of  the  two  procedures.  He  found 
them  to  be  very  close  in  value  and  attributed  the  difference 
in  values  to  th<=*  variability  in  the  Monte  Carlo  procedure 
itself,  i.e.,  the  use  of  different  pseudo  random  numbers, 
rather  than  to  the  difference  in  the  number  of  Monte  Carlo 
runs.  The  table  of  biases  and  the  table  of  standard  devia¬ 
tions  from  Antoon' s  research  are  presented  in  Tables  I  and 
II  respectively. 

Putz's  computerized  univariate  technique  uses  the 
findings  of  Thoman,  Bain,  and  Antle  regarding  R(t)  and 
thus  expands  upon  the  generalized  Monte  Carlo  technique. 

The  univariate  technique  consists  of  ten  steps  (Ref  24:26-27, 
47-65)  as  follows: 

1.  Generate  a  sample  of  component  failure  times  using 
the  true  Weibull  distribution  parameters  0  ,  k  ,  and  c 

This  is  done  by  calling  the  International  Mathematical  & 
Statistical  Libraries  (IMSL)  routine  GGWIB  to  generate  ran¬ 
dom  Weibull  deviates  from  the  Weibull  shape  parameter  and 
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TABLE  I  (continued) 
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then  by  substituting  them  into  the  equation  t  =  0  *  deviate 
+  c  which  is  in  essence  Eq  (13). 

2.  Using  the  component  failure  times,  find  the  maxi¬ 
mum  likelihood  estimates  of  the  shape  and  scale  parameters 
of  the  component  distribution.  The  IMSL  routine  ZSYSTM  is 
called  to  solve  the  two  nonlinear  simultaneous  maximum 
likelihood  equations  for  0  and  k  .  ZSYSTM  does  this  by 
using  a  Newton-type  quadratically  convergent  method  and 
matrix  algebra. 

3.  Estimate  the  component  reliability  by  substituting 
the  true  location  parameter  and  the  maximum  likelihood  esti¬ 
mates  of  the  shape  and  scale  parameters  into  the  component 
reliability  equation,  i.e.,  Eq  (4). 

4.  Calculate  the  unbiased  component  reliability  esti¬ 
mate  by  subtracting  the  bias  from  the  maximum  likelihood 
estimator  of  the  reliability.  The  bias  is  found  by  inter¬ 
polating  with  a  cubic  spline  in  Antoon's  tabled  values  using 
the  IMSL  routines  IBCICU  and  IBCEVU. 

5.  Form  a  vector  of  component  reliability  estimates 
distributed  normally  about  the  unbiased  estimator  by  using 
the  following  equation  which  parallels  Eq  (22): 

Y  =  p  +  aZ  (25) 


where 

Y  =  the  desired  estimate 
p  =  the  mean  or  unbiased  estimate 
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0  =  the  standard  deviation  of  the  unbiased  estimate 

Z  =  a  standard  normal  deviate 

Find  the  standard  deviation  of  the  unbiased  estimator  using 
the  table  of  standard  deviations  from  Antoon's  research  by 
again  using  the  cubic  spline  routines.  Compare  the  standard 
deviation  to  the  square  root  of  the  Cramer-Rao  Lower  Bound 
and  use  the  larger  of  the  two  values  as  the  standard  devia¬ 
tion.  After  the  vector  of  estimates  is  formed,  find  the 
estimates  that  exceed  one  in  value  and  set  them  equal  to  one 
since  reliability  values  have  an  upper  bound  of  one. 

6.  Repeat  Steps  1  through  5  for  each  component. 

7.  Calculate  a  vector  of  system  reliability  estimates 
using  the  estimates  of  component  reliability  and  the  system 
reliability  equation. 

8.  Calculate  the  true  reliability  of  the  system  using 
the  true  component  reliabilities  (calculated  from  the  true 
component  parameters).  Order  the  vector  of  system  relia¬ 
bility  estimates  and  find  the  100(l-a)  percent  lower  confi¬ 
dence  limits  and  associated  confidence  intervals.  Compare 
these  to  the  true  system  reliability  and  note  if  the  inter¬ 
vals  contain  the  true  system  reliability. 

9.  Repeat  Steps  1  to  8  until  the  desired  number  of 
Monte  Carlo  simulations  is  reached. 

10.  Find  the  percentage  of  runs  in  which  the  confi¬ 
dence  intervals  covered  the  true  system  reliability. 
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Putz  ran  600  Monte  Carlo  simulations  on  each  of  four 


systems  using  a  mission  run  time  of  100  hours.  He  found  the 
confidence  interval  coverage  of  the  true  system  reliability 
for  five  different  component  sample  sizes  (10,  15,  20,  50, 
and  100)  at  seven  different  confidence  levels  (99%,  95%,  90%, 
80%,  70%,  60%,  and  50%).  He  found  that,  for  each  system, 
as  the  component  sample  size  increased,  the  confidence 
interval  coverage  improved.  He  also  noted  that  the  confi¬ 
dence  interval  coverage  was  low  for  the  smaller  sample  sizes. 
This  low  coverage  results  in  an  optimistic  system  reliability 
estimate,  i.e.,  the  lower  confidence  limit  being  used  as  the 
system  reliability  estimate  is  too  high  in  value  for  these 
particular  component  sample  sizes.  He  also  found  that  the 
systems  with  lower  true  system  reliabilities  had  more  accur¬ 
ate  confidence  interval  coverage  and  thus  more  accurate 
lower  confidence  limits  (Ref  24:32). 

Knowing  that  the  component  reliability  estimates  are 
asymptotically  normal  from  the  research  by  Thoman ,  Bain,  and 
Antle,  Putz  conducted  a  Kolmogorov-Smirnov  test  of  normality 
on  the  actual  distribution  of  component  reliability  esti¬ 
mates.  He  found  that  the  distribution  was  normal  for  compo¬ 
nent  sample  sizes  of  50  or  more.  However,  for  component 
sample  sizes  of  20  or  less,  he  found  that  the  distribution 
was  not  normal  with  mean  equal  to  the  unbiased  estimate  of 
R(t)  and  standard  deviation  equal  to  the  interpolated  value 
from  Antoon's  tables.  For  these  component  sample  sizes,  he 


found  that  the  distribution  of  component  reliability  esti¬ 
mates  was  skewed  to  the  left.  That  is,  the  distribution  of 
component  reliability  estimates  was  significantly  affected 
by  the  upper  reliability  bound  of  one  but  not  by  the  lower 
reliability  bound  of  zero.  He  recommended  that  further 

/v 

research  be  done  to  find  the  distribution  of  R(t)  and  sug¬ 
gested  that  a  beta  distribution  be  tried  (Ref  24:41,43). 

Putz  concluded  that  his  univariate  method  worked  best 
for  systems  that  have  component  reliabilities  and  system 
reliabilities  less  than  0.9.  If  the  reliabilities  are 
greater  than  0.9,  skewness  of  the  R(t)  distributions 
impacts  the  results.  However,  the  univariate  method  can  be 
used  in  this  case  if  large  sizes  of  component  test  data  are 
available  to  use  with  this  technique  (Ref  24.43). 

Because  skewness  of  the  R(t)  distributions  was 
largely  due  to  generating  component  reliability  estimates 
greater  than  one  in  value  and  then  setting  those  estimates 
equal  to  one,  a  technique  for  replacing  these  values  with 
more  realistic  reliability  values  should  improve  the  accu¬ 
racy  of  the  univariate  technique.  Such  a  method  of  replace¬ 
ment  is  discussed  next. 

Gatlif fe ’ s  Technique 

In  1976,  Thomas  Gatliffe  analyzed  the  accuracy  of  a 
log-gamma  method  for  computing  lower  confidence  limits  for 
system  reliability  using  only  component  data.  The  system 
components  were  assumed  to  fail  independently  of  one  another, 
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and  the  test  environment  under  which  component  data  was 
collected  was  assumed  to  approximate  the  system  mission 
environment.  Gatliffe's  procedure  followed  that  of  the 
generalized  Monte  Carlo  technique.  He  assumed  that  the 
number  of  component  failures  was  binomially  distributed 
(Ref  9:7-9,17).  His  specific  Monte  Carlo  technique  is  not 
of  interest  to  this  thesis.  However,  the  idea  behind  his 
method  of  compensating  for  perfect  system  reliability  esti¬ 
mates  is  of  interest  because  of  the  component  reliability 
estimates — and  thus  some  system  reliability  estimates — of 
value  one  generated  by  Putz  in  his  univariate  technique.  In 
order  to  correct  for  the  unrealistic  situation  of  perfect 
system  reliability,  Gatliffe  viewed  the  system  as  a  series 
network  and  replaced  one  of  the  simulated  component  data  of 
zero  failures  with  0.37  failures  if  the  desired  significance 
level  «  was  0.2  in  value,  0.25  failures  if  «  was  0.1, 
and  0.16  failures  if  «  was  0.05  (Ref  9:15).  These  failure 
values  used  by  Gatliffe  are  the  average  solution  F^*  to 
the  following  equation  (Ref  9:46): 

(Ft*)2  +  (2N-3)Fi*  +  (N-l )  In  a(X2 (2 , l-«) >  =  0  (26) 

where  N  is  the  component  sample  size.  The  derivation  of 
this  equation  is  presented  in  Appendix  A. 

If  any  system  network  were  divided  into  subsystems 
that  were  all  in  series  with  one  another,  Gatliffe's  tech¬ 
nique  could  be  used  to  replace  any  simulated  subsystem 
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reliability  estimate  of  value  one  with  a  more  realistic 
value.  Such  a  procedure  may  improve  the  accuracy  of  the 
univariate  technique.  To  apply  the  technique,  component 
reliability  estimates  still  need  to  be  considered  as  dis¬ 
cussed  in  the  next  section. 


III.  Procedure 


This  section  describes  modifications  and  improvements 
made  to  the  three  Monte  Carlo  techniques  of  estimating  sys¬ 
tem  reliability  and  the  common  design  parameters  used  in 
order  to  compare  the  accuracy  of  the  techniques. 

Systems  Analyzed 

The  univariate  and  bivariate  system  reliability  esti¬ 
mation  techniques  were  tested  on  four  simple  system  networks: 
one  with  strictly  serial  components  (System  1),  one  with  only 
parallel  components  (System  3),  and  two  with  simple  combina¬ 
tions  of  series  and  parallel  components  (Systems  2  and  4). 
These  four  combinations  of  the  same  components  were  used  in 
order  to  determine  whether  the  overall  accuracy  of  a  tech¬ 
nique  depends  upon  a  particular  network  configuration  (Ref 
24:23).  Each  system  contained  three  to  five  components  as 
illustrated  in  Figure  4.  The  reliability  of  a  more  complex 
system  network  can  be  found  by  dividing  the  network  into  sub¬ 
systems  similar  to  these  and  by  applying  Bayes  rule. 

For  all  four  systems,  each  component  was  assumed  to 
have  failure  times  that  followed  a  Weibull  distribution,  i.e., 
the  failure  times  can  be  modeled  by  Eq  (1).  Parameter  values 
for  the  five  components  are: 

1.  Component  1:  k=2,  0=250,  c=0 

2.  Component  2:  k=3,  0=210,  c=0 
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3. 

Component 

3: 

k=2 ,  0=300,  c=0 

4. 

Component 

4: 

k=3 . 5 ,  0=150,  c=0 

5. 

Component 

5: 

k=2 . 5 ,  0=250,  c=0 

Mission  run  time  for  each  component  is  arbitrarily  assumed 
to  be  100  hours.  These  component  parameters  are  the  exact 
parameters  used  by  Putz  in  his  research  (Ref  24:22-23). 

Because  the  original  intent  of  this  thesis  was  to  use 
Putz's  results  to  represent  the  univariate-normal  technique, 
the  same  component  parameters,  sample  sizes,  mission  time, 
confidence  levels,  and  Monte  Carlo  runs  were  used.  Thus 
each  technique  generated  test  data  (component  failure  times) 
for  the  five  component  sample  sizes  of  10,  15,  20,  50,  and 
100  and  tested  confidence  interval  coverage  for  the  seven 
confidence  levels  of  99%,  95%,  90%,  80%,  70%,  60%,  and  50% 
over  600  Monte  Carlo  simulation  runs.  However,  part  of  the 
univariate-normal  technique  had  to  be  recoded  and  thus 
Putz's  results  could  no  longer  be  used  as  a  representative 
case  of  the  univariate-normal  technique.  In  addition,  the 
excessive  central  processing  time  required  to  simulate  the 
same  number  of  system  reliability  points  (2000)  as  Putz  used 
led  to  the  simulation  of  lower  numbers  of  reliability  points 
in  each  of  the  techniques.  For  the  univariate-normal, 
univariate-beta,  and  bivariate  techniques,  100,  200,  600, 
and  1000  system  reliability  point  estimates  were  generated 
for  each  component  sample  size,  and  confidence  interval 
coverage  of  the  true  system  reliability  was  found. 
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When  recoding  of  the  univariate-normal  technique  was 
found  to  be  needed,  the  numbers  used  for  sample  sizes,  confi¬ 
dence  levels,  and  Monte  Carlo  runs  were  not  changed  since 
they  have  good  underlying  theoretical  and  empirical  bases. 

As  already  stated  in  Section  II,  researchers  have  found  that 
20  to  100  components  should  be  tested  in  order  to  get  the 
most  information  from  a  testing  situation.  Also,  interest 
exists  in  reducing  these  numbers  of  components  tested  in 
order  to  reduce  costs.  Therefore,  the  sample  sizes  of  10, 

15,  20,  50,  and  100  are  appropriate  for  this  research  project. 
It  was  expected  that  the  higher  component  sample  sizes  would 
lead  to  better  confidence  interval  coverage  of  the  true  sys¬ 
tem  reliability  because  better  estimates  should  result  from 
having  more  information,  i.e.,  more  failure  times  on  which 
to  base  the  estimates. 

Confidence  levels  above  50%,  especially  in  the  90% 
range,  are  appropriate  since  a  confidence  level  indicates 
the  degree  of  certainty  associated  with  an  estimate.  The 
military  services  obviously  would  like  to  have  high  degrees 
of  certainty,  and  thus  low  degrees  of  risk,  attached  to 
system  reliability  estimates. 

The  use  of  600  Monte  Carlo  simulation  runs  is  also 
appropriate  and  should  produce  an  estimation  error  of  4%. 

This  error  is  measured  by  the  variance  of  the  estimates  due 
to  the  Monte  Carlo  simulation  process;  it  does  not  include 
the  variance  due  to  any  other  design  parameters  in  the 


technique.  Assuming  that  the  random  numbers  generated  are 
truly  random  and  the  system  model  is  perfect,  the  only 
errors  in  a  Monte  Carlo  simulation  are  due  to  sampling. 

These  sampling  errors  decrease  with  l/Zn-  where  n  is  the 
number  of  trials  or  runs  of  the  simulation  (Ref  27:258). 

Thus,  if  n  is  600,  l/Zn- =.0408  or  4.08%  error.  For 
n=1000  ,  l//n~ =.0316  or  3.16%  error,  and  for  n=10,000  , 

l//n~=.01  or  1%  error.  The  additional  processing  time 
needed  for  1,000  runs  was  not  judged  to  be  worth  the  extra 
0.92%  accuracy,  and  the  time  needed  for  10,000  runs  was 
certainly  not  worth  the  extra  3%  accuracy. 

System  parameters  are  further  discussed  under  the 
procedures  for  each  particular  technique. 

Determination  of  the  Accuracy  of  Each  Technique 

The  purpose  of  each  technique  is  to  find  the  lower 
confidence  limit  of  system  reliability  and  to  use  this  limit 
as  an  estimate  of  the  true  reliability  of  the  system.  (The 
lower  confidence  limit  of  system  reliability  will  be  referred 
to  as  "the  system  reliability  estimate"  or  "the  estimate"  in 
the  following  pages.)  In  order  to  judge  the  accuracy  of  the 
system  reliability  estimates  produced  by  each  technique,  the 
true  system  reliability  was  calculated  and  compared  to  each 
estimate  as  outlined  in  Steps  8  through  10  of  the  general 
Monte  Carlo  procedure  discussed  in  Section  II. 

The  true  system  reliability  was  found  by  first  calcu¬ 
lating  the  true  reliabilities  of  each  component  in  the 


system  network  and  then  using  the  appropriate  reliability 

expression  for  series  and  parallel  component  networks  given 

in  Figure  1.  The  true  reliability  of  each  component  was 

found  by  substituting  its  known  parameters,  given  in  this 

section,  into  the  reliability  equation  for  a  component  whose 

failure  times  have  a  Weibull  distribution  (Eq  (4)).  The 

resulting  true  component  reliabilities,  R.  for  j=compo- 

J 


nent  1  to  component  5  ,  are: 

R1  =  exp(-( 100/250)2)  =  .85214 
R2  =  exp(-( 100/210)3)  =  .89765 
R3  =  exp(-(100/300)2)  =  .89484 
R4  =  exp(-(  100/150)  3,5  )  =  .78512 
R5  =  exp(-(100/250)2"5 )  =  .90376 

Then  the  reliability  of  each  system,  Rs4  where  i=system  1 


to  system  4  ,  was  calculated  as  follows: 

Rsl  =  R1R2R3 

=  (.85214)(.89765)(. 89484) 

=  .68448  (27) 

Rs2  =  R1^1-R2R3^ 

=  ( .85214 ) C 1- ( 1- -  89765 )(1-. 89484 ) ) 

=  .84297  (28) 

RSg  =  l-I^RgRg 

=  l-( 1- . 85214 )(1-. 89765 )(1-. 89484) 

=  .99841  (29) 

rs4  =  r1(i-r2(i-r5(i-r3r4))) 
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=  ( .85214 ) C 1-C 1- - 89765) (1-.90376(1- 
(1-.89484)(1~. 78512))) 

=  .84197  (30) 

During  each  Monte  Carlo  run,  a  counter  kept  track  of 
the  number  of  times  a  confidence  interval  covered  the  true 
system  reliability.  The  resulting  percent  coverage  is  an 
indication  of  the  confidence  level  that  can  be  attached  to 
that  system  reliability  estimate.  Because  a  confidence 
interval  was  constructed  for  a  given  confidence  level  (i.e., 
for  a  confidence  level  of  99%,  95%,  90%,  80%,  70%,  60%,  or 
50%),  the  calculated  percent  confidence  interval  coverage 
should  closely  approximate  the  given  confidence  level  if  the 
estimation  technique  is  accurate. 

If  the  confidence  interval  covered  the  true  system 
reliability  a  smaller  percentage  of  times  than  would  be 
indicated  by  a  given  confidence  level,  the  confidence  inter¬ 
val  coverage  is  said  to  be  optimistic.  This  means  that  the 
system  reliability  estimate  is  higher  than  the  true  system 
reliability  more  often  than  desired  (more  often  than  100(«)% 
of  the  times).  Therefore,  the  given  confidence  level  cannot 
be  associated  with  a  system  reliability  estimate  generated 
by  the  particular  technique.  How  much  the  confidence  inter¬ 
val  coverage  deviates  from  the  given  confidence  level  will 
determine  the  accuracy  of  the  technique  in  estimating  system 
reliability. 

If  the  confidence  interval  covered  the  true  system 
reliability  a  larger  percentage  of  times  than  would  be 
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expected  from  a  given  confidence  level,  then  the  confidence 
interval  coverage  is  said  to  be  conservative.  This  means 
that  the  system  reliability  estimate  is  lower  than  the  true 
system  reliability  more  often  than  the  given  confidence  level 
would  indicate  and  that  a  confidence  level  at  least  as  high 
as  the  given  confidence  level  can  be  attached  to  the  relia¬ 
bility  estimate.  Thus,  conservative  confidence  interval 
coverage  is  a  very  desirable  result.  Again,  the  amount  the 
confidence  interval  coverage  deviates  from  the  given  confi¬ 
dence  level  determines  the  accuracy  of  the  technique. 

Bivariate  Method  of  Generating  System  Reliabilities 

To  test  the  accuracy  of  the  bivariate  technique  of 
estimating  system  reliability,  only  minor  modifications  were 
made  to  Lannon's  computer  programs.  Lannon ' s  programs  were 
designed  to  find  the  lower  confidence  limit  of  system 
reliability  for  a  given  confidence  level.  Computer  code  was 
added  to  repeat  this  process  600  times  and  to  determine  the 
confidence  interval  coverage  of  the  true  system  reliability 
for  each  given  confidence  level.  Modifications  were  also 
made  to  take  care  of  parameter  estimates  and  reliability 
estimates  exceeding  the  ranges  of  exponential  and  natural 
logarithm  functions.  In  addition,  the  seed  for  the  genera¬ 
tion  of  uniform  and  normal  random  numbers  was  set  to  the 
computer  clock  time  in  order  to  make  each  simulation  run 
independent  from  the  other  runs. 
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A  listing  of  the  computer  code  for  the  modified 


1 


bivariate  technique,  along  with  definitions  of  the  major 
variables,  is  provided  in  Appendix  B. 

Univariate  Method  of  Generating  System  Reliabilities 

As  stated  at  the  beginning  of  this  section,  a  portion 
of  Putz's  univariate-normal  technique  had  to  be  recoded 
making  the  use  of  his  results  in  the  comparison  of  techniques 
invalid.  The  portion  replaced  was  the  method  of  finding  the 
maximum  likelihood  estimates  of  the  shape  and  scale  para¬ 
meters  of  the  Weibull  distribution.  As  described  in  Step  2 
of  the  univariate  technique,  Putz  used  the  IMSL  routine 
ZSYSTM  to  solve  the  two  nonlinear  maximum  likelihood  equa¬ 
tions  for  0  and  k  .  However,  this  IMSL  routine  was 
unable  to  solve  the  equations  due  to  its  constant  inability 
to  invert  a  matrix  it  formed  in  the  process.  As  a  result, 
this  approach  was  replaced  with  the  iterative  parameter 
estimation  routine  developed  by  Harter  and  Moore  and  used  by 
Lannon  in  his  bivariate  technique. 

Other  minor  modifications  were  made  to  the  code  such 
as  deletion  of  dead  code,  deletion  of  code  extraneous  to  the 
technique  (i.e.,  code  to  perform  a  Kolmogorov-Smirnov  test), 
and  the  addition  of  code  to  take  care  of  reliability  esti¬ 
mates  exceeding  the  ranges  of  the  exponential  function.  Also, 
two  seeds  used  in  random  number  generators  were  varied 

than  using  the  two  constant  seed  values  in  Putz's 
.  •  » :  -od*1.  Although  Putz  states  that  he  checked  to  see 
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if  his  results  were  sensitive  to  the  choice  of  an  initial 
random  number  seed  and  found  that  they  were  not,  he  implies 
that  he  only  checked  the  seed  on  the  generator  of  random 
normal  deviates  and  not  on  the  generator  of  failure  times 
(Ref  24:36-37).  Thus,  the  seeds  were  changed  for  the  same 
reason  as  stated  for  the  bivariate  case — to  make  each  simu¬ 
lation  run  independent  from  the  other  runs . 

The  seeds  were  not  set  to  the  clock  time  as  was  done 
in  the  bivariate  case.  There  were  two  reasons  for  this: 

(1)  two  seeds  existed  and  should  not  be  the  same  clock  value 
even  though  they  were  used  in  different  random  number  gen¬ 
erators,  and  (2)  the  comparison  of  techniques  includes  a 
direct  comparison  of  the  univariate-normal  and  univariate- 
beta  techniques;  thus,  the  same  seeds  needed  to  be  used  in 
the  two  techniques  so  that  only  the  underlying  distribution 
of  the  component  reliability  estimates  varied.  Random 
values  of  seeds  were  selected  from  a  table  of  random  numbers 
(Ref  26:370).  A  different  seed  value  was  used  for  each 
component  sample  size  and  for  each  set  of  Monte  Carlo  runs 
when  all  600  runs  could  not  be  made  at  once.  The  seeds  used 
in  all  cases  are  listed  in  Appendix  C. 

The  final  minor  modification  made  to  Putz's  original 
code  is  the  setting  of  negative  component  reliability  esti¬ 
mates  to  zero  since  negative  values  do  not  exist  in  reality. 
This  modification  was  needed  because  Eq  (25),  used  in  Step  5 
of  the  univariate-normal  technique,  not  only  produces 
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component  reliability  estimates  with  values  greater  than  one 
but  also  produces  estimates  with  values  less  than  zero.  A 
counter  was  also  added  to  keep  track  of  the  number  of  times 
negative  estimates  are  generated  to  see  if  the  number  is 
significant  enough  to  impact  the  results.  Thus,  the 
univariate-normal  technique  used  consisted  of  the  10  steps 
described  in  Section  II  with  Steps  2  and  5  replaced  as 
follows : 

2.  Using  the  component  failure  times,  find  the  maxi¬ 
mum  likelihood  estimates  of  the  shape  and  scale  parameters 
of  the  component  distribution.  The  subroutine  PARES  is 
called  to  estimate  the  parameters  using  an  iterative  linear 
interpolation  technique  and  the  maximum  likelihood  equations 
of  the  parameters . 

5.  Form  a  vector  of  component  reliability  estimates 
distributed  normally  about  the  unbiased  estimator  by  using 
the  following  equation: 


Y  =  y  +  az 

where  Y  is  the  desired  estimate,  y  is  the  mean  or 
unbiased  estimate,  a  is  the  standard  deviation  of  the 
unbiased  estimate,  and  z  is  a  standard  normal  deviate. 

The  standard  deviation  of  the  unbiased  estimator  is  found 
using  the  table  of  standard  deviations  from  Antoon's  research 
by  again  using  the  cubic  spline  routines.  However,  the 
standard  deviation  is  compared  to  the  square  root  of  the 
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Cramer-Rao  Lower  Bound  and  the  larger  of  the  two  values  is 
used  as  the  standard  deviation.  After  the  vector  of  esti¬ 
mates  is  formed,  find  the  component  reliability  estimates 
that  fall  outside  the  closed  interval  [0,1]  and  set  them 
equal  to  the  lower  bound  of  zero  or  the  upper  bound  of  one, 
whichever  value  each  is  nearest  to  numerically. 

A  listing  of  the  computer  code  for  the  modified 
univariate-normal  technique  is  provided  in  Appendix  C. 

Beta  Distribution  of  Component  Reliabilities 

As  discussed  in  Section  II,  Putz  generated  sample 
component  reliability  point  estimates  (Step  5  of  the 
univariate-normal  technique)  by  assuming  the  unbiased  maxi¬ 
mum  likelihood  estimate  of  the  component  reliability  was  the 
mean  of  a  normal  distribution.  He  then  conducted  a 
Kolmogorov-Smirnov  test  for  normality  on  his  component 
reliability  estimates  and  found  that,  although  he  assumed 
that  the  estimates  were  asymptotically  normal,  their  distri¬ 
bution  was  not  normal.  He  also  found  that  the  distribution 
was  not  symmetric  but  skewed  toward  the  upper  reliability 
bound  of  one  (Ref  24:41).  Because  Putz  obtained  this  non- 
symmetric  distribution,  a  modification  to  his  univariate- 
normal  technique  was  made.  Another  model,  the  beta  distri¬ 
bution,  for  the  pattern  of  component  reliability  estimates 
was  chosen.  This  new  distribution  not  only  should  better 
model  the  pattern  of  component  reliability  estimates,  but 
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it  will  also  avoid  the  generation  of  estimates  larger  than 
one  or  less  than  zero  in  value.  It  is  expected  that  this 
change  will  improve  the  accuracy  of  the  univariate  technique. 

The  beta  distribution  was  chosen  to  model  the  pattern 
of  component  reliability  estimates  since  its  graph  can 
assume  a  large  variety  of  shapes  for  various  values  of  its 
parameters.  The  probability  distribution  function  for  the 
beta  random  variable  Y  is 


fK-yfw  y“‘1<i-y>6-1.*.e>o 

f (y )  =  {  0<y<l 

,  elsewhere 


(31) 


with  mean  =  oc/(a+8)  and  variance  var  =  (<*B)/  [(*+8) 2  (®+B+l) ] 
(Ref  19:130,A24).  As  in  the  univariate-normal  technique,  the 
unbiased  maximum  likelihood  estimate  of  component  reliability 
was  used  as  the  mean  of  the  distribution  and  the  correspond¬ 
ing  interpolated  value  from  Antoon's  tables  was  used  as  the 
standard  deviation  of  the  distribution.  Using  these  two 
values,  the  parameters  of  the  beta  distribution,  «  and 
B  ,  were  found  as  follows: 


mean  =  <*  /  ( «+0 ) 

<**mean  +  Bornean  =  * 

<*  =  B(mean/(l-mean) ) 

«  =  B*Q  where  Q  =  mean/ ( 1-mean ) 
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Var  =  («0)/ [(=+8)2(cc+b+1)] 

Var(<r+B)2  (oc  +  g  +  l)  =  ccg 

Var( 8Q+8  ) 2 ( 8Q+8+1 )  =  6Q8  where  «  =  8Q 
Var  82(Q+1)2(6(Q+1)+1)  =  62Q 
Var(Q+l)2(8(Q+l)+l)  =  Q 
Var  =  Q/[(1+Q)2(8(Q+1)+1)] 

8(Q+1)  =  Q/(  ( 1+Q) 2 Var )  -  1 

6  =  Q/((l+Q)3Var)  -  l/CQ+l)  (32) 

«  =  6Q 

“  =  Q2/  [(1+Q)  3Var]  -  Q/(Q+1)  (33) 

The  IMSL  routine  GGBTR  was  given  these  values  of  «  and  8 
as  input.  For  each  «  and  8  input,  the  routine  output 
a  random  variable  belonging  to  the  closed  interval  10,1] 

This  random  beta  deviate  was  set  equal  to  the  random  sample 
reliability  estimate.  Thus,  all  component  reliability  esti¬ 
mates  were  generated  by  assuming  they  had  a  beta  distribution 
with  mean  equal  to  the  maximum  likelihood  reliability  esti¬ 
mate  and  standard  deviation  sigma. 

This  procedure,  now  known  as  the  univariate-beta  tech¬ 
nique,  therefore  only  altered  one  step,  Step  5,  of  the 
univariate-normal  technique.  Thus,  the  univariate-beta 
technique  consists  of  the  10  steps  for  the  univariate-normal 
technique  as  described  in  this  section  with  Step  5  replaced 
as  follows: 
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5.  Form  a  vector  of  component  reliability  estimates 


that  have  a  beta  distribution  with  mean  equal  to  the  unbiased 
estimator  and  standard  deviation  equal  to  that  of  the 
unbiased  estimator.  The  standard  deviation  of  the  unbiased 
estimator  is  found  using  the  table  of  standard  deviations 
from  Antoon’s  research  by  again  using  the  cubic  spline 
routines.  However,  the  standard  deviation  is  compared  to 
the  square  root  of  the  Cramer-Rao  Lower  Bound  and  the  larger 
of  the  two  values  is  used  as  the  standard  deviation. 

Thus,  the  modified  code  for  the  univariate-normal 
technique  was  used  for  this  process  with  only  one  change: 
the  code  to  generate  sample  estimates  of  the  component  relia¬ 
bility.  A  listing  of  the  code  for  the  univariate-beta 
technique  is  provided  in  Appendix  C. 

Application  of  Gatliff e ' s  Method 

Because  many  component  reliability  estimates  have 
values  of  one  due  to  truncation  in  the  univariate-normal 
technique,  the  possibility  of  having  several  system  relia¬ 
bility  estimates  with  values  of  one  exists.  Because  perfect 
system  reliability  is  unrealistic,  Gatliffe's  technique  of 
adjusting  for  perfect  system  reliability  estimates  was 
applied  to  the  univariate-normal  technique.  It  was  applied 
to  the  Monte  Carlo  simulation  of  600  system  reliability 
points  for  all  component  sample  sizes  and  all  confidence 
levels.  Gatliffe's  technique  was  not  applied  to  the 
univariate-beta  technique  because  the  probability  of  a 


component's  reliability  being  equal  to  one  is  zero  in  the 
beta  case.  Although  a  possibility  of  some  component  relia¬ 
bility  estimates  having  values  of  one  exists  due  to  computer 
roundoff  in  generating  beta  deviates,  the  number  of  times 
this  would  happen  is  close  to  zero.  Thus,  little  or  no 
improvement  would  be  made  to  the  accuracy  of  the  univariate- 
beta  technique  by  applying  Gatliffe's  method.  Gatliffe’s 
method  also  did  not  need  to  be  applied  to  the  bivariate  case 
because  all  component  reliability  estimates  generated 
belonged  to  the  interval  [0,1)  ,  as  discussed  in  Section 

II.  Since  no  component  reliability  estimates  could  have  a 
value  of  one,  it  is  impossible  for  the  system  reliability 
to  ever  equal  one  in  value. 

To  apply  Gatliffe's  technique,  each  of  the  four  sys¬ 
tems  was  divided  into  subsystems  connected  in  series.  Each 
subsystem  consisted  of  one  component  or  a  grouping  of  com¬ 
ponents.  Thus,  System  1  consisted  of  3  subsystems  connected 
in  series;  subsystems  1,  2,  and  3  corresponded  to  components 
1,  2,  and  3  respectively.  System  2  was  divided  into  2 
serial  subsystems;  subsystem  1  corresponded  to  component  1 
and  subsystem  2  corresponded  to  components  2  and  3  in  paral¬ 
lel.  System  3,  having  three  parallel  components,  consisted 
of  one  subsystem  in  series  with  itself.  Similarly,  System  4 
consisted  of  2  subsystems  connected  in  series;  subsystem  1 
corresponded  to  component  1  and  subsystem  2  corresponded  to 


the  group  of  components  2  through  5.  These  divisions  of 
the  four  systems  into  serially  connected  subsystems  are 
illustrated  in  Figure  5. 

To  determine  if  a  system  reliability  estimate  had  a 
value  of  one  and  needed  to  be  corrected,  the  entire  expres¬ 
sion  was  not  computed,  flagged,  and  recomputed.  Instead, 
the  system  reliability  expressions,  Eqs  (27)  through  (30), 
were  analyzed  to  find  which  components  needed  to  have  a 
value  of  one  in  order  to  make  the  system  reliability  value 
also  equal  to  one.  Using  the  reliability  expressions  dis¬ 
cussed  in  Section  II  and  listed  in  Figure  1,  it  was  noted 
that  in  order  to  have  perfect  system  reliability,  each  sub¬ 
system  must  have  perfect  reliability  since  the  reliability 
expression  for  a  series  of  "components"  is  simply  the  product 
of  the  reliabilities  of  all  "components."  Therefore,  in 
order  for  System  1  to  have  a  reliability  value  of  one,  all 
three  components  must  have  a  reliability  value  of  one. 

For  System  2  to  have  perfect  reliability,  subsystems  1  and  2 
must  have  perfect  reliabilities.  This  means  that  component 
1  must  have  a  reliability  value  of  1  and  either  component  2 
or  component  3  must  have  an  estimated  reliability  value  of  1. 
Because  System  3  has  one  subsystem  made  up  of  3  parallel 
components,  it  will  have  a  perfect  system  reliability  value 
if  one  or  more  of  the  three  components  has  a  reliability 
value  of  one.  Similarly,  System  4  will  achieve  a  reliability 
value  of  one  if  component  1  has  a  reliability  value  of  one 
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and  either  component  2  alone  or  component  5  plus  either 
component  3  or  4  have  perfect  reliability  values.  These 
relationships  can  be  found  by  setting  each  system  reliability 
equation,  i.e.,  Eqs  (27)  through  (30),  to  one  and  solving 
for  all  possible  component  values. 

If  these  key  components  did  have  estimated  values  of 
one,  the  corresponding  system  reliability  expression  was  not 
used  to  find  the  system  reliability  value  since  it  would 
equal  one.  Instead,  the  system  reliability  was  immediately 
equated  to  an  adjusted  value.  It  should  be  noted  that 
System  3  has  the  best  chance  for  increased  confidence  inter¬ 
val  coverage  of  the  true  system  reliability  since  it  has  the 
best  chance  for  reliability  estimates  to  be  adjusted.  Only 
one  component  needs  to  have  an  estimated  reliability  value 
of  one  to  produce  a  reliability  value  of  one  for  the  entire 
system.  Then,  Systems  2,  4,  and  1 — in  that  order — are  likely 
to  need  their  reliability  estimates  adjusted.  However,  the 
chances  of  the  latter  happening  are  small.  Thus,  Gatliffe's 
technique  is  expected  to  significantly  improve  the  accuracy 
of  the  univariate-normal  technique  only  for  System  3. 

In  order  to  adjust  the  system  reliability  estimates  in 
the  case  of  perfect  reliability  values  of  one,  the  three 
step  procedure  suggested  by  Gatliffe  was  used.  It  was 
assumed  that  the  natural  logarithm  of  the  system  reliability 
had  a  gamma  distribution  and  that  the  number  of  failures  of 
each  subsystem  is  distributed  binomially.  The  steps  and 
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their  application  to  the  univariate-normal  technique  are: 

1.  Find  the  series  component  or  subassembly  with  the 
smallest  actual  or  equivalent  number  of  trials,  N  or  N" 
(Ref  9:15-16).  For  each  Monte  Carlo  simulation  performed 
with  the  univariate  technique,  all  components  had  the  same 
sample  size.  It  is  assumed  that  the  subsystem  sample  size 
is  therefore  equal  to  the  sample  size  of  any  one  component 
in  the  subsystem.  Since  this  results  in  all  serially  con¬ 
nected  subsystems  having  the  same  sample  size,  any  subsys¬ 
tem  could  be  selected  as  having  the  smallest  sample  size. 

2.  Change  the  number  of  component  or  subassembly 

failures  to  F'  by  using  the  average  values  of  .37  failures 
for  F'  if  the  significanc  level  <*=.2  ,  .1  failures  for 

F^  if  «=.l  ,  and  .16  failures  for  F'  if  <*=.05  (Ref  9: 

15-16).  In  order  to  be  more  exact  in  replacing  failure  data 
values,  the  value  of  F*  in  Eq  (26)  was  calculated  for  all 
possible  combinations  of  «  and  N  that  were  used  in  the 
univariate  technique.  Thus  the  replacement  value  of  the 
number  of  failures  was  selected  from  Table  III  based  on  the 
particular  component  sample  size  N  and  the  1~<*  confidence 
level  being  investigated.  The  values  in  Table  III  were 
computed  by  using  the  general  solution  to  Eq  (26),  i.e., 

-2N+3  ±/(2N-3)"2-4(N-l)ln«(x29  ,__) 

T?  jfc  _  _ _ _ ^  _ 

2  (34) 

and  the  component  sample  size  N  ,  the  significance  level 
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TABLE  III 


Adjusted  Failure  Data 


Significance 

Level 

10  ■ 

15 

Sample  Size 
20 

50 

100 

.01 

.0488 

.0478 

.0474 

.0467 

.0464 

.05 

.  1610 

.1584 

.1570 

.  1550 

.1542 

.10 

.2531 

.2493 

.2475 

.2445 

.2435 

.20 

.  3721 

.3675 

.3652 

.3615 

.3603 

.30 

.4431 

.4382 

.4359 

.4319 

.4307 

.40 

.4820 

.4771 

.4747 

.4707 

.4694 

.50 

.4943 

.4893 

.4870 

.4830 

.4817 

«  ,  and  the 

X22,l-« 

values 

which  were 

obtained 

from  the 

IMSL  routine  MDCHI . 

3.  Recompute  the  lower  confidence  limit  estimate  using 
the  revised  failure  data  (Ref  9:16).  In  order  to  change  the 
failure  data  of  the  selected  component  or  subsystem,  one 
would  change  the  estimated  component  or  subsystem  reliability 
value  to  1-F*/N  per  Gatliffe's  procedure.  However,  since 
the  univariate  technique  was  designed  to  have  all  component 
sample  sizes  equal,  1-F*/N  will  be  the  same  value  regard¬ 
less  of  which  serially  connected  subsystem  is  chosen;  and, 
all  the  rest  of  the  serially  connected  subsystems  will  have 
values  of  one.  Thus,  in  the  univariate  technique,  the  system 
reliability  itself  can  be  changed  from  a  value  of  one  to  a 
value  of  1-F*/N  for  the  appropriate  F*  corresponding  to 
a  particular  N  and  « 


In  summary,  the  univariate  technique  with  Gatliffe's 
adjustment  for  perfect  system  reliability  follows  the  10 
step  modified  procedure  for  the  normal  case  with  Steps  7 
through  10  modified  as  follows: 

7,  Calculate  the  true  reliability  of  the  system  using 
the  true  component  reliabilities  which  are  calculated  from 
the  true  component  parameters. 

8.  For  a  given  confidence  level  l-«  ,  calculate  a 

vector  of  system  reliability  estimates  using  the  estimates 

of  component  reliability  and  the  system  reliability  equation. 
Replace  all  system  reliability  estimates  of  one  with  a  value 
of  1-F*/N  ,  where  N  is  the  common  component  sample  size 

and 

-2N+3  ± / ( 2N- 3 ) 2 - 4 ( N- 1 ) In® ( X 2 o  i 
•p*  =  _ ~  >  A 


9.  Order  the  vector  of  system  reliability  estimates 
and  find  the  100(l-«)  percent  lower  confidence  limit  and 
associated  confidence  interval.  Compare  this  limit  to  the 
true  reliability  and  note  if  the  interval  contains  the  true 
system  reliability. 

10.  Repeat  Steps  8  and  9  until  all  desired  confidence 
levels  have  been  used. 

11.  Repeat  Steps  1  through  10  until  the  desired  number 
of  Monte  Carlo  simulations  is  reached. 
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12.  Find  the  percentage  of  runs  in  which  the  confi¬ 
dence  intervals  covered  the  true  system  reliability. 

A  listing  of  the  computer  code  for  this  procedure  is 
provided  in  Appendix  D. 
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IV.  Results  and  Conclusions 


Presentation  of  Results 

As  discussed  in  Section  III,  a  lower  confidence  inter¬ 
val  was  constructed  for  a  given  confidence  level  of  99%,  95%, 
90%,  80%,  70%,  60%,  or  50%  (these  confidence  levels  are 
referred  to  in  the  tables  and  text  as  the  required  confidence 
levels)  during  each  Monte  Carlo  simulation  run.  After  all 
Monte  Carlo  runs  were  completed,  the  percentage  of  times  the 
confidence  intervals  covered  the  true  system  reliability  was 
calculated.  This  percent  coverage  should  closely  approxi¬ 
mate  the  required  confidence  level  if  the  estimation  tech¬ 
nique  is  accurate. 

Tables  IV  through  XIX  present  the  percent  confidence 
interval  coverages  for  each  of  the  four  systems  obtained 
from  the  bivariate  technique.  In  general,  for  the  99,  199, 
599,  and  999  generated  system  reliability  points,  the  bivar¬ 
iate  technique  results  in  percent  confidence  interval  cover¬ 
ages  for  System  1  that  are  higher  than  the  required  confi¬ 
dence  levels.  For  Systems  2,  3,  and  4,  the  bivariate  tech¬ 
nique  generally  results  in  coverages  being  lower  than  the 
required  confidence  levels  except  for  a  few  cases  involving 
component  sample  size  100.  System  3  has  the  lowest  amount 
of  coverage  and  Systems  2  and  4  have  about  the  same  amount 
of  coverage. 

Tables  XX  through  XXV  present  the  percent  confidence 
interval  coverage  results  from  using  the  univariate-normal 
technique  on  each  of  the  four  system  networks.  For  the 
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TABLE  IV 

Percent  Confidence  Interval  Coverage  for 
System  1  Using  the  Bivariate  Technique 
and  99  Point  Estimates 


Required  Confidence  Sample  Size 


Level  (Percent) 

10 

15 

20 

50 

100 

99 

100.00 

99.83 

99.83 

99.33 

99.83 

95 

98.83 

97.50 

97.00 

94.67 

94.67 

90 

96.17 

94.17 

93.33 

90.00 

89.67 

80 

86.17 

85.83 

84.17 

82.50 

82.00 

70 

76.83 

75.67 

76.33 

72.00 

73.17 

60 

67.50 

68.17 

65.67 

60.33 

63.17 

50 

55.67 

58.17 

53.17 

50.83 

52.83 

TABLE  V 

Percent  Confidence  Interval  Coverage  for 
System  2  Using  the  Bivariate  Technique 
and  99  Point  Estimates 


Required  Confidence 

Sample  Size 

Level  (Percent) 

10 

15  20  50 

100 

99 

99.00 

98.83 

99.83 

98.50 

99.50 

95 

93.00 

93.50 

94.83 

94.50 

95.83 

90 

85.33 

87.67 

89.50 

87.50 

91.00 

80 

73.67 

75.17 

77.83 

73.33 

80.67 

70 

63.83 

66.00 

67.50 

63.83 

70.33 

60 

54.33 

56.50 

55.83 

53.50 

60.33 

50 

44.67 

47.17 

44.33 

43.67 

50.50 

TABLE  VI 


Percent  Confidence  Interval  Coverage  for 
System  3  Using  the  Bivariate  Technique 
and  99  Point  Estimates 


Required  Confidence 

Sample  Size 

Level  (Percent) 

10 

15 

20 

50 

100 

99 

96.67 

96.50 

97.50 

98.17 

98.67 

95 

83.83 

87.83 

88.33 

90.17 

91.17 

90 

71.67 

77.17 

81.00 

82.50 

84.50 

80 

56.83 

63.33 

64.50 

69.50 

74.33 

70 

46.00 

51.33 

50.50 

56.83 

62.33 

60 

34.83 

40.83 

39.67 

47.00 

53.33 

50 

27.00 

32.00 

30.50 

37.17 

43.33 

TABLE  VII 

Percent  Confidence  Interval  Coverage  for 

System  4  Using  the  Bivariate  Technique 
and  99  Point  Estimates 

Required  Confidence 

Level  (Percent)  10 

Sample  Size 

15  20  50 

100 

99 

99.17 

98.83 

99.83 

98.17 

99.67 

95 

93.17 

93.67 

95.00 

94.83 

95.83 

90 

85.17 

88.17 

89.17 

89.00 

91.17 

80 

74.33 

77.17 

77.83 

74.50 

80.83 

70 

64.50 

66.50 

68.00 

64.17 

69.83 

60 

53.67 

57.17 

54.83 

54.50 

60.17 

50 

43.67 

47.17 

45.17 

44.33 

50.83 

86 


TABLE  VIII 


Percent  Confidence  Interval  Coverage  for 
System  1  Using  the  Bivariate  Technique 
and  199  Point  Estimates 


Required  Confidence  Sample  Size 


Level  (Percent) 

10 

15 

20 

50 

100 

99 

100.00 

99.00 

99.83 

99.67 

99.17 

95 

97.67 

96.17 

97.50 

96.50 

97.17 

90 

95.33 

92.50 

93.50 

91.67 

92.50 

80 

87.00 

84.67 

84.83 

81.67 

82.50 

70 

77.17 

74.67 

77.67 

74.83 

72.50 

60 

68.83 

67.67 

67.83 

64.17 

63.50 

50 

60.17 

57.67 

58.33 

53.67 

53.50 

TABLE  IX 

Percent  Confidence  Interval  Coverage  for 
System  2  Using  the  Bivariate  Technique 
and  199  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

98.83 

98.67 

99.00 

99.00 

98.83 

95 

94.00 

93.00 

94.83 

95.17 

95.17 

90 

88.83 

87.33 

89.00 

90.17 

89.50 

80 

78.33 

77.33 

77.50 

78.00 

79.67 

70 

66.33 

68.00 

67.83 

67.50 

70.00 

60 

55.50 

56.50 

57.00 

58.50 

61 . 17 

50 

46.00 

46.33 

46.83 

46.17 

48.83 
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TABLE  X 


Percent  Confidence  Interval  Coverage  for 
System  3  Using  the  Bivariate  Technique 
and  199  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

95.17 

95.50 

97.17 

98.00 

98.17 

95 

83.50 

85.17 

88.33 

91.50 

92.67 

90 

73.83 

77.33 

80.50 

82.67 

85.50 

80 

59.67 

62.17 

68.33 

70.67 

74.00 

70 

46.33 

50.83 

56.50 

60.00 

63.67 

60 

38.33 

41.67 

43.83 

49.33 

51.00 

50 

30.00 

31.67 

34.17 

39.33 

44.00 

TABLE  XI 

Percent  Confidence  Interval  Coverage  for 

System  4  Using  the  Bivariate  Technique 
and  199  Point  Estimates 

Required  Confidence 

Level  (Percent)  10 

Sample  Size 

15  20  50 

100 

99 

98.67 

98.67 

99.00 

99.00 

98.33 

95 

94.33 

93.67 

94.00 

94.83 

95.50 

90 

89.17 

87.50 

88.00 

90.00 

90.00 

80 

78.00 

78.00 

78.17 

78.50 

79.67 

70 

67.00 

68.33 

67.83 

67.17 

69.33 

60 

55.33 

57.00 

57.00 

56.67 

59.83 

50 

44.67 

45.83 

46.83 

46.67 

49.00 
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Required  Confidence  Sample  Size 


Level  (Percent) 

10 

15 

20 

50 

100 

99 

99.83 

99.83 

99.50 

99.00 

99.33 

95 

99.00 

97.67 

98.17 

96.00 

96.33 

90 

96.00 

93.67 

93.33 

92.00 

90.83 

80 

87.00 

86.33 

85.67 

83.17 

81.00 

70 

78.83 

78.00 

76.17 

75.50 

69.00 

60 

69.00 

68.50 

66.33 

66.67 

59.67 

50 

58.33 

58.17 

54.50 

55.33 

50.00 

TABLE  XIII 

Percent  Confidence  Interval  Coverage  for 
System  2  Using  the  Bivariate  Technique 
and  599  Point  Estimates 


Required  Confidence  Sample  Size 


Level  (Percent) 

10 

15 

20 

50 

100 

99 

99.00 

98.83 

99.33 

99.  17 

99.17 

95 

94.50 

94.00 

95.17 

94.50 

94.17 

90 

87.00 

88.67 

89.83 

90.17 

88.17 

80 

74.33 

76.50 

76.83 

78.50 

77.83 

70 

64.67 

66.33 

67.67 

69.50 

68.50 

60 

54.50 

57.00 

58.33 

58.67 

58.83 

50 

46.67 

46.83 

49.17 

48.00 

50.00 
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TABLE  XIV 


Percent  Confidence  Interval  Coverage  for 
System  3  Using  the  Bivariate  Technique 
and  599  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

96.83 

96.67 

98.00 

97.33 

98.50 

95 

85.00 

87.33 

88.00 

91.00 

93. 17 

90 

74.00 

79.67 

78.50 

84.00 

84.33 

80 

58.00 

63.50 

64.33 

73.17 

72.67 

70 

46.67 

52.17 

50.67 

62.33 

58.83 

60 

36.00 

41.00 

40.67 

49.33 

51.17 

50 

26.83 

32.50 

33.00 

38.67 

40.67 

TABLE  XV 

Percent  Confidence  Interval  Coverage  for 
System  4  Using  the  Bivariate  Technique 
and  599  Point  Estimates 


Required  Confidence  Sample  Size 


Level  (Percent) 

10 

15 

20 

50 

100 

99 

99.00 

99.33 

99.17 

99.33 

99.17 

95 

94.17 

93.67 

95.17 

94.67 

93.83 

90 

87.17 

88.00 

89.83 

90.00 

87.67 

80 

74.00 

76.83 

77.50 

78.67 

78.33 

70 

65.17 

66.83 

67.33 

68.83 

68.17 

60 

55.67 

56.83 

59.50 

58.67 

58.50 

50 

46.33 

47.17 

49.00 

47.67 

49.17 

TABLE  XVI 


Percent  Confidence  Interval  Coverage  for 
System  1  Using  the  Bivariate  Technique 
and  999  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

99.83 

99.50 

99.50 

99.50 

99.67 

95 

97.17 

97.50 

96.50 

96.50 

97.33 

90 

93.17 

93.50 

93.17 

92.67 

91.33 

80 

84.50 

85.67 

84.33 

82.67 

81.67 

70 

75.33 

76.00 

74.67 

71.83 

72.83 

60 

67.67 

66.50 

64.67 

60.83 

61.50 

50 

58.17 

55.83 

57.50 

52.50 

49.50 

Percent 

System 

TABLE  XVII 

Confidence  Interval  Coverage  for 

2  Using  the  Bivariate  Technique 
and  999  Point  Estimates 

Required  Confidence 

Level  (Percent)  10 

Sample  Size 

15  20  50 

100 

99 

99.00 

99.33 

98.83 

98.17 

99.17 

95 

94.00 

93.83 

93.00 

93.33 

95.33 

90 

89.17 

87.67 

86.33 

89.00 

91.83 

80 

77.33 

76.33 

73.67 

79.17 

80.17 

70 

65.00 

68.  33 

64.33 

68.33 

67.67 

60 

53.17 

59.17 

55.50 

60.17 

56.50 

50 

45.83 

47.17 

46.67 

49.83 

45.83 
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TABLE  XVIII 


Percent  Confidence  Interval  Coverage  for 
System  3  Using  the  Bivariate  Technique 
and  999  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

93.67 

96.17 

97.00 

98.17 

99.17 

95 

81.17 

87.17 

88.33 

91.17 

93.83 

90 

70.50 

77.67 

78.17 

83.33 

85.83 

80 

56.50 

63.00 

63.33 

68.50 

73.83 

70 

46.33 

51.17 

52.67 

58.00 

61.50 

60 

35.17 

40.67 

39.17 

46.67 

47.83 

50 

27.50 

32.33 

29.67 

36.83 

37.83 

TABLE  XIX 

Percent  Confidence  Interval  Coverage  for 

System  4  Using  the  Bivariate  Technique 
and  999  Point  Estimates 

Required  Confidence 

Level  (Percent)  10 

Sample  Size 

15  20  50 

100 

99 

99.67 

99.33 

98.67 

98.50 

99.00 

95 

94.33 

93.83 

93.00 

94.00 

95.67 

90 

89.00 

87.50 

85.83 

88.50 

91.67 

80 

76.83 

76.67 

73.83 

79.17 

81.17 

70 

64.33 

69.00 

64.67 

68.67 

68.33 

60 

53.50 

58.33 

55.50 

60.00 

58.33 

50 

45.83 

48.33 

47.67 

48.67 

45.50 
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TABLE  XX 


Percent  Confidence  Interval  Coverage  for  System  1  Using 
the  Univariate-Normal  Technique  and 
100  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

95.67 

96.17 

97.67 

97.83 

99.17 

95 

89.50 

90.33 

93.00 

93.17 

94.33 

90 

84.00 

85.67 

88.67 

87.33 

88.50 

80 

75.33 

77.17 

79.00 

77.83 

78.83 

70 

69.17 

68.83 

67.83 

66.83 

70.67 

60 

60.83 

59.00 

57.00 

58.50 

61.83 

50 

51.33 

48.67 

47.33 

46.17 

52.17 

TABLE  XXI 

Percent  Confidence  Interval  Coverage  for 
the  Univariate-Normal  Technique 
100  Point  Estimates 

System  2 
and 

Using 

Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

88.67 

92 . 50 

92.83 

96.00 

97.67 

95 

82.00 

87.17 

86.33 

90.17 

93.17 

90 

78.00 

83.00 

81.50 

85.50 

88.50 

80 

69.33 

74 .00 

73.50 

73.83 

80.00 

70 

61.50 

64.33 

64.67 

63.67 

71.33 

60 

52.67 

55.33 

55.67 

55.17 

62.00 

50 

45.33 

46.33 

48.83 

47.00 

52.67 
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TABLE  XXII 


Percent  Confidence  Interval  Coverage  for  System  3  Using 
the  Univariate-Normal  Technique  and 
100  Point  Estimates 


TABLE  XXIV 

Percent  Confidence  Interval  Coverage  for  System  1  Using 
the  Univariate-Normal  Technique  and 
200  Point  Estimates 


Required  Confidence 


Sample  Size 


TABLE  XXV 

Percent  Confidence  Interval  Coverage  for  System  2  Using 
the  Univariate-Normal  Technique  and 
200  Point  Estimates 


TABLE  XXVI 


Percent  Confidence  Interval  Coverage  for  System  3  Using 
the  Univariate-Normal  Technique  and 
200  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

79.17 

88.17 

89.83 

94.17 

95.33 

95 

67.33 

75.67 

77.33 

84.17 

90.83 

90 

59.17 

66.33 

68.17 

75.17 

84.33 

80 

45.50 

53.17 

53.33 

63.17 

71.33 

70 

35.83 

42.67 

43.67 

49.17 

59.67 

60 

26.83 

33.83 

34.50 

42.67 

47.33 

50 

18.83 

24.33 

26.33 

32.83 

35.50 

TABLE  XXVII 

Percent  Confidence  Interval  Coverage  for 
the  Univariate-Normal  Technique 
200  Point  Estimates 

System  4 
and 

Using 

Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

89.50 

90.50 

93.67 

96.17 

97.50 

95 

83.33 

84 . 50 

86.67 

90.83 

92.83 

90 

77.50 

78.67 

82.00 

85.67 

88.83 

80 

68.67 

71.17 

72.83 

76.17 

77.17 

70 

61.00 

61 . 83 

64.33 

65.17 

66.17 

60 

53.33 

53.33 

54.83 

54.83 

55.67 

50 

46.00 

45.00 

44.67 

44.33 

47.83 

TABLE  XXVIII 


Percent  Confidence  Interval  Coverage  for  System  1  Using 
the  Univariate-Normal  Technique  and 
600  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

94.33 

95.33 

96.50 

96.83 

99.00 

95 

88.33 

90.17 

93.00 

92.17 

95.50 

90 

83.00 

83.50 

87.17 

86.83 

89.67 

80 

74.33 

75.33 

77.50 

78.00 

80.50 

70 

65.50 

68.67 

67.00 

69.50 

71.17 

60 

59.17 

60.00 

55.33 

60.17 

62.50 

50 

48.50 

51.50 

46.83 

50.17 

51.33 

TABLE  XXIX 

Percent  Confidence  Interval  Coverage  for 
the  Univariate-Normal  Technique 
600  Point  Estimates 

System  2 
and 

Using 

Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

88.00 

92.00 

93.33 

96.83 

98.00 

95 

81.00 

85.33 

87.50 

92.67 

93.67 

90 

75.67 

80.83 

80.67 

86.67 

88.00 

80 

67.33 

71.50 

72.17 

76.67 

79.50 

70 

60.00 

62.00 

62.17 

66.33 

70.50 

60 

52.17 

52.83 

53.17 

56.00 

60.00 

50 

43.50 

45.50 

46.50 

46.33 

50.83 
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TABLE  XXX 

Percent  Confidence  Interval  Coverage  for  System  3  Using 
the  Univariate-Normal  Technique  and 
600  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

80.67 

86.67 

90.17 

94.50 

98.00 

95 

69.00 

75.00 

79.00 

86.83 

92.00 

90 

59.83 

66.33 

71.17 

79.33 

83.33 

80 

46.83 

53.50 

53.33 

65.83 

72.17 

70 

35.83 

43.83 

41.33 

55.00 

60.83 

60 

26.50 

33.50 

31.17 

43.33 

50.17 

50 

19.17 

23.67 

23.33 

35.50 

39.83 

TABLE  XXXI 

Percent  Confidence  Interval  Coverage  for  System  4 
the  Univariate-Normal  Technique  and 

600  Point  Estimates 

Using 

Required  Confidence 

Level  (Percent)  10 

Sample  Size 

15  20  50 

100 

99 

87.67 

91.50 

93.17 

97.00 

97.83 

95 

81.17 

85.83 

87.33 

92.83 

93.50 

90 

75.83 

80.50 

81.17 

86.00 

88.67 

80 

67.17 

71.17 

71.67 

77.00 

78.33 

70 

60.50 

62.50 

62.33 

66.83 

70.00 

60 

51.50 

52.33 

54.00 

56.33 

60.67 

50 

42.17 

45.33 

46.33 

47.17 

50.67 

98 
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TABLE  XXXII 


Percent  Confidence  Interval  Coverage  for  System  1  Using 
the  Univariate-Normal  Technique  and 
1000  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

15 

Sample  i 
20 

Size 

50 

100 

99 

96.67 

96.33 

96.33 

98.00 

98.83 

95 

91.00 

89.50 

91.67 

94.67 

95.17 

90 

86.00 

85.33 

86.33 

90.50 

90.00 

80 

77.67 

75.50 

77.00 

78.17 

82.00 

70 

66.83 

65.67 

67.00 

67.33 

71.00 

60 

56.83 

56.50 

57.50 

59.00 

61.50 

50 

47.00 

47.17 

48.17 

48.50 

53.50 

TABLE  XXXIII 

Percent  Confidence  Interval  Coverage  for 
the  Univariate-Normal  Technique 
1000  Point  Estimates 

System  2 
and 

Using 

Required  Confidence 
Level  (Percent) 

10 

15 

Sample  Size 

20  50 

100 

99 

88.17 

91.33 

91.83 

96.33 

96.83 

95 

81.67 

83.33 

87.00 

91.33 

93.17 

90 

78.17 

76.83 

83.50 

86.33 

89.33 

80 

71.83 

68.00 

75.17 

75.33 

79.33 

70 

62.83 

60.00 

64.17 

65.33 

68.67 

60 

53.17 

52.83 

53.17 

53.50 

58.00 

50 

43.67 

44.67 

44.50 

44.67 

48.33 

99 


TABLE  XXXIV 


Percent  Confidence  Interval  Coverage  for  System  3  Using 
the  Univariate-Normal  Technique  and 
1000  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

15 

Sample  Size 

20  50 

100 

99 

80.67 

86.67 

89.33 

96.00 

97.83 

95 

67.67 

73.50 

80.00 

87.33 

91.17 

90 

58.83 

65.50 

70.33 

80.83 

84.17 

80 

46.17 

52.83 

57.83 

66.33 

72.50 

70 

34.83 

41.33 

47.00 

54.83 

61.17 

60 

25.17 

31.50 

34.83 

42.33 

50.83 

50 

18.50 

21.83 

23.00 

32.17 

43.17 

TABLE  XXXV 

Percent  Confidence  Interval  Coverage  for 
the  Univariate-Normal  Technique 
1000  Point  Estimates 

System  4 
and 

Using 

Required  Confidence 
Level  (Percent) 

10 

15 

Sample  Size 

20  50 

100 

99 

89.17 

90.83 

91.83 

96.33 

97.00 

95 

83.17 

83.33 

87  00 

92.33 

93.00 

90 

78.83 

77.33 

82.67 

86.83 

88.83 

80 

73.00 

68.50 

75.83 

75.67 

79.17 

70 

61.50 

60.33 

62.83 

64.50 

68.83 

60 

54.33 

53.67 

53.50 

54.17 

59.83 

50 

45.00 

44.83 

44.00 

44.17 

48.17 

100 


various  number  of  simulated  reliability  points,  the  percent 
confidence  interval  coverages  by  the  univariate-normal  tech¬ 
nique  are  generally  lower  than  the  required  confidence 
levels  except  for  some  cases  involving  component  sample  size 
100.  In  these  cases,  the  amount  by  which  the  coverage  exceeds 
the  required  confidence  level  ranges  from  0.33%  to  3.50%. 

It  should  be  noted  that  when  simulating  200  system  reliabil¬ 
ity  points,  there  are  only  three  occurrences  of  coverage 
exceeding  the  required  confidence  level  (in  System  1,  for 
component  sample  size  15  and  confidence  level  50%;  and  for 
component  sample  size  100  and  confidence  levels  70%  and  80%). 
As  in  the  bivariate  case,  the  highest  coverage  is  obtained 
for  System  1,  the  lowest  coverage  is  obtained  for  System  3, 
and  about  equal  coverage  is  obtained  for  Systems  2  and  4. 

Tables  XXXVI  through  LI  present  the  percent  confidence 
interval  coverages  from  the  univariate-beta  technique  for 
the  four  systems.  The  percent  confidence  interval  coverages 
by  the  univariate-beta  technique  are  always  lower  than  the 
required  confidence  levels  for  System  3.  For  Systems  1,  2, 
and  4,  the  coverages  are  generally  lower  than  the  required 
confidence  levels  except  for  a  few  cases  of  component  sample 
100.  It  should  be  noted  that  the  number  of  cases  for  which 
coverage  exceeds  a  required  confidence  level  is  four  when 
simulating  100  system  reliability  points  and  three  when  simu¬ 
lating  600  and  1000  system  reliability  points.  In  these 
cases,  the  amount  by  which  the  coverage  exceeds  a  required 
confidence  level  is  small  (0.17%  to  2.00%).  When  simulating 
200  system  reliability  points,  12  cases  of  coverage  exceeding 
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TABLE  XXXVI 


Percent  Confidence  Interval  Coverage  for  System  1  Using 
the  Univariate-Beta  Technique  and 
100  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

96.83 

97.83 

98.67 

98.33 

98.67 

95 

91.50 

94.00 

92.83 

93.67 

93.83 

90 

84.17 

88.33 

87.67 

89.00 

88.33 

80 

72.00 

76.17 

76.33 

77.83 

79.17 

70 

63.00 

68.00 

66.50 

68.17 

70.33 

60 

52.67 

56.67 

56.50 

57.33 

59.33 

50 

42.83 

48.33 

46.33 

47.17 

49.50 

TABLE 

XXXVII 

Percent  Confidence  Interval  Coverage  for  System  2  Using 
the  Univariate-Beta  Technique  and 
100  Point  Estimates 

Required  Confidence  Sample  Size 


Level  (Percent) 

10 

15 

20 

50 

100 

99 

94.17 

95.67 

97.67 

98.00 

98.83 

95 

85.00 

88.17 

89.83 

94.50 

94.67 

90 

78.50 

81.67 

81 . 33 

88.50 

89.17 

80 

66.67 

69.33 

71.00 

78.33 

79.83 

70 

56.17 

57.17 

60.00 

67.33 

69.67 

60 

45.00 

47.17 

49.83 

54.50 

60.50 

50 

34.83 

36.00 

41.00 

46.17 

49.33 

TABLE  XXXVIII 


Percent  Confidence  Interval  Coverage  for  System  3  Using 
the  Univariate-Beta  Technique  and 
100  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

83.83 

90.67 

91.33 

96.67 

97.50 

95 

66.33 

76.83 

79.00 

87.67 

89.83 

90 

54.50 

66.67 

68.33 

77.67 

83.00 

80 

39.17 

52.50 

52.83 

65.17 

70.00 

70 

30.17 

39.50 

41.17 

52.83 

58.67 

60 

22.83 

30.50 

33.00 

40.50 

48.67 

50 

16.67 

21.83 

23.50 

30.83 

36.67 

TABLE  XXXIX 

Percent  Confidence  Interval  Coverage  for 
the  Univariate-Beta  Technique 
100  Point  Estimates 

System  4 
and 

Using 

Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

94.17 

95.83 

97.17 

97.83 

98.50 

95 

84.17 

87.33 

89.67 

94 . 17 

93.50 

90 

78.00 

82.33 

82.33 

88.00 

89.00 

80 

66.00 

68.50 

70.17 

77.67 

79.83 

70 

56.50 

56.67 

59.17 

66.67 

69.67 

60 

46.83 

46.67 

49.67 

55.00 

60.33 

50 

36.00 

35.50 

41.00 

46.50 

50.17 

103 


TABLE  XL 


Percent  Confidence  Interval  Coverage  for  System  1  Using 
the  Univariate-Beta  Technique  and 
200  Point  Estimates 


Required  Confidence 

Sample  Size 

Level  (Percent) 

10 

15 

20 

50 

100 

99 

98.00 

97.50 

98.50 

98.83 

98.83 

95 

92.17 

92.83 

92.17 

94.33 

94.83 

90 

86.83 

85.83 

87.50 

90.33 

90.67 

80 

75.83 

74.83 

77.67 

81 . 33 

80.33 

70 

64.17 

69.17 

67.83 

70.83 

69.17 

60 

55.17 

60.17 

56.67 

62.17 

58.50 

50 

44.83 

49.00 

46.67 

51.83 

48.17 

TABLE  XL I 

Percent  Confidence  Interval  Coverage  for  System  2 
the  Univariate-Beta  Technique  and 

200  Point  Estimates 

Using 

Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

92.50 

96.00 

95.83 

98.17 

98.33 

95 

84.83 

88.00 

90.17 

93.67 

94.67 

90 

77.67 

81.83 

83.17 

87.67 

90.67 

80 

65.67 

67.83 

71.50 

76.00 

82.50 

70 

55.17 

58.67 

60.  83 

64.50 

71.00 

60 

45.67 

48.33 

50.67 

53.00 

61 . 17 

50 

37.67 

41.00 

41.00 

46.17 

50.50 

104 


f 


TABLE  XL I I 


Percent  Confidence  Interval  Coverage  for  System  3  Using 
the  Univariate-Beta  Technique  and 
200  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

84.50 

90.17 

92.83 

96.83 

97.50 

95 

64.00 

75.00 

80.33 

90.67 

89.67 

90 

54.00 

65.50 

69.67 

82.67 

82.67 

80 

39.67 

52.17 

54.33 

68.50 

70.17 

70 

28.33 

41.67 

41.00 

57.17 

56.17 

60 

21.83 

30.83 

29.67 

45.17 

48.00 

50 

15.00 

22.83 

21.83 

36.17 

38.50 

TABLE  XLIII 

Percent  Confidence  Interval  Coverage  for  System  4  Using 
the  Univariate-Beta  Technique  and 
200  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

92.00 

95.83 

95.83 

98.17 

98.17 

95 

84.67 

87.83 

90.67 

93.50 

94.67 

90 

77.17 

82.17 

82.83 

88.17 

90.83 

80 

66.00 

68.50 

72.17 

75.83 

81.83 

70 

55.67 

58.33 

61.67 

64.83 

72.00 

60 

45.  17 

49.17 

50.67 

52.17 

61 . 33 

50 

37.83 

41.00 

41 . 17 

45.50 

50.83 
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TABLE  XL IV 


Percent  Confidence  Interval  Coverage  for  System  1  Using 
the  Univariate-Beta  Technique  and 
600  Point  Estimates 


Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

97.33 

98.33 

98.33 

98.67 

99.00 

95 

92.00 

93.00 

92.83 

93.67 

95.50 

90 

83.67 

85.83 

86.33 

88.17 

88.67 

80 

74 . 33 

75.17 

75.83 

78.33 

77.00 

70 

61.00 

65.50 

65.00 

69.67 

69.33 

60 

52.  50 

55.50 

55.33 

58.67 

62.00 

50 

41.83 

45.33 

46.33 

48.67 

51.50 

TABLE  XLV 

Percent  Confidence  Interval  Coverage  for 
the  Univariate-Beta  Technique 
600  Point  Estimates 

System  2 
and 

Using 

Required  Confidence 

Sample  Size 

Level  (Percent) 

10 

15 

20 

50 

100 

99 

92.33 

95.50 

96.50 

97.83 

98.33 

95 

84.83 

89.83 

89.00 

92.17 

93.83 

90 

78.67 

82.83 

82.00 

87.17 

88 . 33 

80 

66.00 

70.83 

71.50 

75.17 

77.67 

70 

53.  83 

58.67 

61.83 

64.00 

67.33 

60 

47.17 

47.50 

51.50 

53.50 

56.83 

50 

37.83 

38.67 

41.83 

44.00 

48.67 
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TABLE  XLVI 


Percent  Confidence  Interval  Coverage  for  System  3  Using 
the  Univariate-Beta  Technique  and 
600  Point  Estimates 


Required  Confidence  Sample  Size 


Level  (Percent) 

10 

15 

20 

50 

100 

99 

80.50 

89.50 

91.33 

97.00 

97.50 

95 

63.67 

74.83 

77.00 

87.83 

90.83 

90 

52.17 

63.  83 

66.83 

80.33 

82.83 

80 

38.67 

47.33 

53.00 

67.83 

69.50 

70 

29.17 

38.17 

43.00 

55.33 

61.00 

60 

22.50 

27.50 

33.  33 

43.33 

50.33 

50 

14.17 

20.33 

21.83 

32.33 

38.83 

TABLE  XLVI I 

Percent  Confidence  Interval  Coverage  for  System  4  Using 
the  Univariate-Beta  Technique  and 
600  Point  Estimates 


Required  Confidence  Sample  Size 


Level  (Percent) 

10 

15 

20 

50 

100 

99 

92.33 

95.17 

96.33 

97.83 

98.50 

95 

85.50 

89.83 

89.50 

92.83 

94.33 

90 

78.83 

83.00 

82.00 

87.33 

89.33 

80 

66.50 

69.83 

71.50 

75.00 

77.00 

70 

54.50 

58.17 

61.17 

64.50 

66.83 

60 

46.17 

49.00 

51.33 

55.00 

56.67 

50 

38.33 

38.00 

41.67 

43.67 

48.17 
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TABLE  XLVIII 

Percent  Confidence  Interval  Coverage  for  System  1  Using 
the  Univariate-Beta  Technique  and 
1000  Point  Estimates 


Required  Confidence 

Sample  Size 

Level  (Percent) 

10 

15 

20 

50 

100 

99 

96.83 

98.17 

98.33 

99.00 

99.00 

95 

90.00 

93.50 

94.00 

94.00 

94.50 

90 

82.67 

87.17 

88.50 

89.17 

89.00 

80 

71.33 

77.00 

78.17 

77.83 

78.00 

70 

59.83 

65.50 

68.83 

66.67 

69.17 

60 

50.50 

55.67 

56.83 

57.67 

60.17 

50 

40.50 

44.83 

44.67 

48.33 

51.50 

TABLE  XL IX 

Percent  Confidence  Interval  Coverage  for 
the  Univariate-Beta  Technique 
1000  Point  Estimates 

System  2 
and 

Using 

Required  Confidence 
Level  (Percent) 

10 

Sample  Size 

15  20  50 

100 

99 

95.83 

94.83 

96.33 

98.33 

97.83 

95 

86.33 

87.50 

90.17 

93.50 

91.67 

90 

78.67 

79.83 

85.67 

87.67 

84.83 

80 

64.50 

69.83 

73.67 

75.67 

77.00 

70 

54.17 

59.33 

62.00 

63.00 

67.17 

60 

45.50 

48.33 

51 . 33 

53 . 33 

60.17 

50 

37.50 

42.17 

40.50 

41.83 

49.00 
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TABLE  L 


Percent  Confidence  Interval  Coverage  for  System  3  Using 
the  Univariate-Beta  Technique  and 
1000  Point  Estimates 


Required  Confidence  Sample  Size 


Level  (Percent) 

10 

15 

20 

50 

100 

99 

81.00 

90.17 

92.17 

96.50 

97.83 

95 

63.33 

75.67 

80.83 

87.67 

89.67 

90 

51.83 

63.50 

70.67 

78.50 

83.33 

80 

35.67 

47.67 

55.67 

63.00 

69.67 

70 

26.33 

36.67 

40.83 

53.  33 

60.00 

60 

20.50 

28.83 

31.17 

43.00 

48.83 

50 

14.00 

22.67 

24.00 

34.17 

39.67 

TABLE  LI 

Percent  Confidence  Interval  Coverage  for  System  4  Using 
the  Univariate-Beta  Technique  and 
1000  Point  Estimates 


Required  Confidence  Sample  Size 


Level  (Percent) 

10 

15 

20 

50 

100 

99 

95.67 

95.17 

96.00 

98.17 

97.67 

95 

86.50 

87.17 

90.17 

93.83 

91.50 

90 

79.00 

80.50 

85.83 

87.83 

85.33 

80 

64.83 

69.00 

72.83 

75.33 

75.67 

70 

53.67 

59.00 

62.33 

63.33 

68.00 

60 

45.00 

49.33 

51.33 

53.17 

58.00 

50 

37.00 

42.00 

40.33 

41.67 

48.17 

a  required  confidence  level  occur  for  the  sample  size  of 
100  and  5  cases  occur  for  the  sample  size  of  50  (these  5  are 
all  in  System  1).  As  in  the  bivariate  and  univariate-normal 
cases,  the  most  coverage  by  the  univariate-beta  technique  is 
obtained  for  System  1,  the  least  coverage  is  obtained  for 
System  3,  and  approximately  equal  coverage  is  obtained  for 
System  2  and  4. 

For  all  three  techniques,  two  patterns  regarding 
coverage  can  be  found  in  the  tabled  results.  The  first 
pattern  is  that  as  the  component  sample  size  increases  for 
a  required  confidence  level  in  any  system,  the  percent  con¬ 
fidence  interval  coverage  converges  toward  the  required  con¬ 
fidence  level.  This  is  a  reasonable  result  since  as  the 
component  sample  size  increases,  the  technique  has  more 
information  on  which  to  base  an  estimate  of  the  system 
reliability.  In  addition,  as  the  sample  size  increases,  the 
distributions  assumed  to  be  normal  in  these  techniques  become 
more  and  more  like  true  normal  distributions.  This  could 
also  account  for  the  exceptions  in  coverage  patterns  found 
in  all  three  techniques  that  occur  in  cases  involving  the 
highest  component  sample  size  of  100. 

The  second  pattern  is  that  the  percent  confidence 
interval  coverage  is  inversely  related  to  the  true  system 
reliability.  System  3,  which  has  the  highest  true  system 
reliability  (.99841),  received  the  lowest  coverage.  Systems 
2  and  4  have  approximately  equal  system  reliabilities 
(.84297  and  .84197  respectively)  and  also  received  approxi¬ 
mately  equal  coverage.  System  1,  which  has  the  lowest  true 
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1 


system  reliability  (.68448),  received  the  highest  coverage. 
Thus,  as  the  true  system  reliability  decreases,  the  coverage 
provided  by  any  of  these  three  techniques  increases. 

Comparison  of  Techniques 

When  compared  to  the  univariate-normal  technique,  the 
bivariate  technique  generally  results  in  a  higher  percent 
coverage  of  the  true  system  reliability  except  in  the  cases 
where  the  component  sample  size  is  100  and  the  required  confi¬ 
dence  levels  are  50%,  60%,  and  70%.  However,  in  these  cases, 
the  univariate-normal  technique  generally  results  only  in 
1%  to  3%  more  coverage.  It  is  of  interest  to  note  that  when 
simulating  200  system  reliability  points,  the  bivariate  case 
results  in  higher  coverage  for  virtually  all  component  sample 
sizes  including  the  component  sample  size  of  100  (the  one 
exception  is  in  System  4  at  the  50%  confidence  level  for 
component  sample  size  10). 

When  compared  to  the  univariate-beta  technique,  the 
bivariate  technique  results  in  a  higher  percent  coverage  of 
the  true  system  reliability  with  some  exceptions.  The  major 
exceptions  are  the  coverages  for  component  sample  size  100 
when  simulating  200,  600,  and  1000  system  reliability  points. 
Also,  when  simulating  100  system  reliability  points  for  the 
cases  of  component  sample  size  50,  Systems  2  and  4  show  a 
higher  coverage  by  the  univariate-beta  technique  for  the  50 
to  80  percent  confidence  levels.  The  coverage  by  the 
univariate-beta  technique  is  better  by  0.33%  to  5.00%  in 
these  cases.  As  the  number  of  simulated  system  reliability 
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points  increases  from  100  to  1000,  the  number  of  times  the 
univariate-beta  technique  has  higher  coverage  decreases. 

In  comparing  the  univariate-normal  and  univariate- 
beta  techniques,  the  univariate-beta  technique  is  generally 
better  at  the  higher  required  confidence  levels,  i.e.,  at 
the  90,  95,  and  99  percent  confidence  levels.  However,  as 
the  number  of  system  reliability  points  generated  increases 
to  1000,  the  univariate-normal  technique  becomes  better  for 
the  component  sample  size  of  100  for  all  four  systems  and 
for  the  component  sample  size  of  10  for  Systems  1  and  3.  It 
should  be  noted  that  the  coverage  provided  by  the  univariate- 
beta  technique  when  generating  200  system  reliability  points 
is  much  better  for  Systems  1  and  3  than  when  100,  600,  and 
1000  system  reliability  points  are  generated. 

Theoretically,  as  the  number  of  system  reliability 
poinls  generated  increases,  the  percent  coverage  of  the  true 
system  reliability  should  converge  to  the  required  confidence 
level.  Thus,  when  using  one  of  these  techniques  to  estimate 
a  system's  reliability,  1000  system  reliability  points  should 
be  simulated.  However,  approximately  the  same  amount  of 
coverage  was  obtained  when  generating  100,  200,  600,  and 
1000  points.  Thus,  when  conducting  accuracy  tests  of  these 
techniques  using  Monte  Carlo  simulation,  100  points  instead 
of  higher  numbers  of  points  could  be  used  to  examine  the 
effect  of  any  modifications  to  the  techniques  since  the 
computer  execution  times  for  these  techniques  are  quite 
high  (see  Appendices  B,  C,  and  D). 
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Results  of  Gatlif fe 1 s  Technique 

The  confidence  interval  coverage  results  of  the 
univariate-normal  technique  after  being  adjusted  for  perfect 
system  reliability  estimates  are  listed  in  Tables  LII 
through  LV.  The  result  of  applying  Gatlif fe's  method  to  the 
univariate-normal  technique  is  that  there  is  no  change  in 
the  percent  confidence  interval  coverage  for  Systems  1,  2, 
and  4.  For  System  3,  the  coverage  obtained  by  applying 
Gatliffe's  method  is  increasingly  better  for  component  sample 
sizes  20,  15,  and  10  respectively.  The  improvement  ranges 
from  an  increase  of  4.5%  to  60.0%  coverage.  There  is  very 
little  improvement  for  component  sample  size  50  and  no 
improvement  for  the  component  sample  size  100. 

When  compared  to  the  univariate-beta  technique,  this 
adjusted  univariate-normal  technique  is  still  better  for 
component  sample  sizes  10,  15,  and  20  in  System  3  and 
slightly  better  for  component  sample  size  100  in  System  3. 
When  compared  to  the  bivariate  technique,  better  coverage  is 
obtained  with  this  technique  for  component  sample  sizes  10 
and  15  and  for  component  sample  size  20  at  the  80%,  90%, 

95%,  and  99%  confidence  levels. 

The  result  of  significant  improvement  for  only  System 
3  was  expected  as  discussed  in  Section  III.  However,  no 
improvement  at  all  for  the  other  systems  should  have  been 
expected  since  all  system  reliability  estimates  used  by 
Gatliffe's  method  to  replace  perfect  system  reliability 
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TABLE  LI I 


Percent  Confidence  Interval  Coverage  for  System  1  Using 
the  Adjusted  Univariate-Normal 
Technique 


Required  Confidence 
Level  (Percent) 

10 

15 

Sample  Size 

20  50 

100 

99 

94.33 

95.33 

96.50 

96.83 

99.00 

95 

88.33 

90.  17 

93.00 

92.17 

95.50 

90 

83.00 

83.50 

87.17 

86.83 

89.67 

80 

74.33 

75.33 

77.50 

78.00 

80.50 

70 

65.50 

68.67 

67.00 

69.50 

71.17 

60 

59.17 

60.00 

55.  33 

60.17 

62.50 

50 

48.50 

51.50 

46.83 

50.17 

51.33 

TABLE  LIII 

Percent  Confidence  Interval  Coverage  for  System  2  Using 
the  Adjusted  Univariate-Normal 
Technique 


Required  Confidence 
Level  (Percent) 

10 

15 

Sample  ! 
20 

3ize 

50 

100 

99 

88.00 

92.00 

93.33 

96.83 

98.00 

95 

81.00 

85.33 

87.50 

92.67 

93.67 

90 

75.67 

80.83 

80.67 

86.67 

88.00 

80 

67.33 

71.50 

72.17 

76.67 

79.50 

70 

60.00 

62.00 

62.17 

66.33 

70.50 

60 

52.17 

52.83 

53.17 

56.00 

60.00 

50 

43.50 

45.50 

46.50 

46.33 

50.83 

114 


TABLE  LIV 


Percent  Confidence  Interval  Coverage  for  System  3  Using 
the  Adjusted  Univariate-Normal 
Technique 


Required  Confidence 
Level  (Percent) 

10 

15 

Sample  Size 

20  50 

100 

99 

100.00 

100.00 

100.00 

98.17 

98.00 

95 

100.00 

100.00 

100.00 

87.67 

92.00 

90 

100.00 

100.00 

100.00 

79.83 

83.33 

80 

100.00 

95.50 

69.00 

66.17 

72.17 

70 

95.00 

60.33 

49.67 

55.17 

60.83 

60 

56.00 

45.17 

37.17 

43.33 

50.17 

50 

36.33 

33.50 

27.83 

35.50 

39.83 

TABLE  LV 

Percent  Confidence  Interval  Coverage  for  System  4  Using 
the  Adjusted  Univariate-Normal 
Technique 


Required  Confidence 
Level  (Percent) 

10 

15 

Sample  Size 

20  50 

100 

99 

87.67 

91.50 

93.17 

97.00 

97.83 

95 

81.17 

85.83 

87.33 

92.83 

93.50 

90 

75.83 

80.50 

81 . 17 

86.00 

88.67 

80 

67.17 

71.17 

71.67 

77.00 

78.33 

70 

60.50 

62.50 

62.33 

06.83 

70.00 

60 

51.50 

52.33 

54.00 

56.33 

60.67 

50 

42.17 

45.33 

46.33 

47.17 

50.67 
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estimates  are  high  in  value,  i.e.,  above  0.95  in  vaJue  (see 
Table  III).  Since  System  3  has  the  only  true  reliability 
greater  than  0.95,  it  is  the  only  system  that  can  have  an 
increase  in  the  number  of  system  reliability  estimates  that 
are  less  than  or  equal  to  the  true  system  reliability  during 
the  Monte  Carlo  simulations.  Thus,  the  adjusted  univariate- 
normal  technique  will  only  be  more  effective  in  predicting 
the  system  reliability  than  the  other  techniques  if  the  true 
reliability  is  believed  to  be  larger  than  0.95  and  if  the 
reliability  is  being  estimated  for  a  component  sample  size 
of  20  or  less. 

Significant  improvement  in  the  percent  confidence 
interval  coverage  was  only  noticed  for  component  sample  sizes 
20,  15,  and  10  because  of  the  percentage  of  the  component 
reliability  estimates  generated  with  values  of  one  (Step  5 
of  the  univariate-normal  technique).  The  percentages  are 
as  follows: 

Component  Sample 


Size 

Percentage 

10 

8.08 

15 

4.40 

20 

2.24 

50 

0.093 

100 

0.009 

As  can  be  seen,  the  number  of  component  reliability  estimates 
of  value  one  is  quite  small  for  component  sample  sizes  50  and 
100  and  increasingly  larger  for  sample  sizes  20,  15,  and  10. 
This  is  due  to  the  fact  that  the  distribution  of  the  compo¬ 
nent  reliability  estimates  is  normal  for  component  sample 
sizes  50  and  100  but  not  for  component  sample  sizes  20,  15, 
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and  10  (see  Section  II,  page  57).  Recall  that  in  System  3, 
only  one  perfect  component  reliability  estimate  is  needed  to 
obtain  a  perfect  system  reliability  estimate.  Because  the 
number  of  perfect  component  reliability  estimates  increases 
as  the  sample  size  decreases,  there  are  increasingly  more 
chances  to  have  perfect  system  reliability  estimates — and 
thus  apply  Gatliffe's  technique — as  the  sample  size  decreases. 
Thus,  the  coverage  for  the  adjusted  univariate-normal  tech¬ 
nique  is  increasingly  better  as  the  component  sample  size 
decreases  from  20  to  10. 

Conclusions 

In  summary,  the  following  five  conclusions  are  drawn 
from  the  data  for  the  bivariate,  univariate-normal,  and 
univariate-beta  Monte  Carlo  simulation  techniques: 

1.  For  any  given  technique,  accuracy  varies  indirectly 
with  the  true  system  reliability.  As  the  true  system  relia¬ 
bility  decreases,  the  accuracy  of  the  technique  increases. 

As  the  true  system  reliability  increases,  the  accuracy  of 
the  technique  decreases. 

2.  The  bivariate  technique  is  the  most  accurate  of 
the  three  techniques  regardless  of  the  number  of  system 
reliability  points  being  generated. 

3.  The  univariate-beta  technique  is  generally  more 
accurate  than  the  univariate-normal  technique  at  the  higher 
required  confidence  levels. 

4.  Gatliffe's  method  of  adjusting  for  perfect  system 
reliability  will  only  improve  the  accuracy  of  the  univariate- 
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normal  technique  for  component  sample  sizes  of  20  or  less  if 
the  true  system  reliability  is  greater  than  0.95.  Thus,  the 
adjusted  univariate-normal  technique  should  be  used  to 
estimate  a  system's  reliability  only  if  there  is  reason  to 
believe  it  is  higher  than  0.95. 

5.  The  accuracy  of  each  technique  does  not  vary 
greatly  as  the  number  of  system  reliability  points  simulated 
changes.  A  tradeoff  between  computer  execution  time  and 
resulting  accuracies  needs  to  be  made  by  the  user  of  the 
technique . 

Recommendations 

Under  the  testing  conditions  used  in  this  thesis,  if 
desiring  to  estimate  a  systems  reliability,  use: 

1.  The  bivariate  technique  if  the  true  system  relia¬ 
bility  is  believed  to  be  below  0.95. 

2.  The  adjusted  univariate-normal  technique  if  the 
true  system  reliability  is  believed  to  be  greater  than  or 
equal  to  0.95  and  the  component  data  has  a  sample  size  of 
20  or  less. 

Further  work  should  be  done  to  improve  the  accuracy 
of  the  bivariate  technique.  In  such  a  case,  the  code  should 
be  restructured  to  decrease  the  execution  time  required  to 
run  the  program. 
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Derivation  of  Gatlif fe ' s  Failure  Equation 

In  deriving  Eq  (26),  Gatliffe  began  by  examining  the 
expression  for  a  system's  reliability  under  the  condition 
that  the  system  network  be  viewed  as  a  set  of  components  or 
subassemblies  connected  in  logical  series.  The  reliability 
of  a  system  with  k  components  or  subassemblies  in  series 
is 


k 

Rs  =  7T  P. 

i=l  ( 35 ' 


where  P^  is  the  reliability  of  the  ith  component  or  sub- 
assembly.  Let  s  =  -In  Rs  (36) 

k 

=  -  Z  ln(l-Q. )  where  Q.  =  1-P. 
i=l  1  ii 


k  Q  2 

=  I  (Qi  + 
i=l  1  ^ 


+  .  .  . ) 


using  the  series  expansion  for  ln(l-x)  ,  i.e.,  ln(l-x)  = 
”  (x)d 

-  Z  -■  •  -  if  Oix<l  .  For  small  values  of  Q.  ,  i.e., 
j  =  l  J  1 


k  Qi2 

s  =  Z  (Q,  + 

i=l  1  J 


with  maximum  error  of  0.34%  of  true  value  (Ref  9:10). 


V 

Letting  T±  =  Qi  +  -g-  , 


s  =  E  T. 
i-1  1 


(37) 


Gatliffe  showed  that  T\  can  be  written  in  general  as 

~  ~  Bi  ^ 

T.  =  A.Q.  +  -x-  Q. 2  where  A.  and  B.  are  chosen  so  as  to 

1  1  1  &  1  X  X 

C2N.-3)  N. 

make  T.  unbiased.  Thus  A.  =  7-^ — ^-r-  and  B.  =  rr — r 

1  1  (2N^-2)  1  PL-1 

where  PL  is  the  number  of  tests  on  the  ith  component 
whose  failures  are  binomially  distributed  with  para- 

Fi 

meters  Qi  and  =  n7  (Ref  9:38-39).  He  thus 

A 

showed  that  is  an  unbiased  estimator  of  and  that 


s  =  E  T.  is  therefore  an  unbiased  estimator  of  s  (Ref  9: 
i=l  1 

38-39).  He  also  showed  for  component  "unreliability" 
and  component  sample  size  PL  (Ref  9:40-43)  that 


Var(s)  =  E  Var(T. ) 

i=l  1 


k  T. 

=  I  (jp) 

i=l  wi 


(38) 


Gatliffe  intuitively  assumed  that  the  probability  distribu¬ 
tion  of  s  is  gamma  with  parameters  r  and  0  ,  i.e., 
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fg(x,r,0)  = 


„-x/0 


,  xkO  and  9>0 

,  otherwise  (39) 


with  mean  E(s)  =  r8  =  £•  T.  and  variance  Var(s)  =  r02 

i=l  1 

k  T. 

=  £  (rr- )  (Ref  9:11).  Using  these  expressions  for  the 

1=1  1  N 

mean  and  variance  of  s  ,  Gatliffe  solved  these  expressions 
for  r  and  0  (Ref  9:12): 


r  = 


(I  T .  )  ■ 
i=l 
k  T. 

Z  N1 
i=l  l 


(40) 


0  = 


k  T. 
r  _±. 

i=l  "i 
k 

Z  T. 
i=l  1 


(41) 


since  Z  T.  =  -In  Rs  and  E(s)  =  r0  ,  the  parameter  0 
i=l  1 

I*  0 

can  be  rewritten  as  0  =  —  and  thus 


_  E(s )  _  -In  Rs 


(42) 


2s 


Since  s  has  a  gamma  (r,0)  distribution,  ^  has  a 
X2(2r)  distribution.  This  means  that  for  a  given  signifi¬ 
cance  level  *  , 
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1-a 


=  P[ 


2s 


i  X 


(2r,l-“) 


] 


Thus , 

2s 

i_oc  =  p[e  <  -g-£g - ] 

X(2r,l-“) 

Using  the  fact  that  0  =  ~lr^  Rs  , 


l-oc  =  p[ 


-In  Rs 


2s 


L(2r,  l-«) 


•] 


1-a  =  p [in  Rs 


>  -2rs _ 

x( 2r , l-“ ) 


Thus,  Rs*(°0  ,  the  100(1-“)%  lower  confidence  limit  for 

Rs  can  be  expressed  as  (Ref  9:12-13): 

Rs*(“)  =  exp(~^ - ) 

X(2r,l-“)  (43) 

The  100(1-^)%  lower  confidence  limit  estimate  for  Rs  is 
then  just 

rs*(“)  =  exp(^j2r]-s - ) 

X(  [2r] , l-“ )  (44) 

where  2r  is  replaced  with  [2r]  since  it  is  very  diffi¬ 
cult  to  calculate  chi-square  values  of  noninteger  degrees 
of  freedom.  Gatliffe  justified  this  substitution  by  showing 
that  the  ratio  of  the  chi-square  value  to  its  number  of 
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I 


degrees  of  freedom  changes  slowly  as  the  number  of  degrees 
of  freedom  changes.  He  also  used  computer  routines  to  cal¬ 
culate  some  chi-square  values  with  noninteger  degrees  of 
freedom  and  found  that  a  difference  in  the  chi-square  value 
is,  in  the  worst  case,  not  noticed  until  the  third  decimal 
place  (Ref  9:13). 

When  all  components  have  zero  failures,  s  will  have 
a  value  of  zero  and  Eq  (44)  will  yield  a  lower  confidence 

A 

limit  estimate,  Rs*(o:)  ,  of  one.  The  situation  is  unreal¬ 

istic  because  components  do  fail. 

Gatliffe  stated  that  conducting  an  equal  number  of 
tests,  N  ,  without  failure  on  all  the  series  system  com¬ 
ponents  and  subassemblies  is  the  same  as  conducting  N  tests 
on  the  system  without  failure  (Ref  9:44).  Thus,  the  number 
of  system  successes,  W  ,  can  be  related  to  Rs  by  the 
following  binomial  formula: 

^  N  i  N-  i 

Z  (.)RsJ(l-Rs)  J  =  Prob  (number  successes  >  W) 
j=W  3 

The  100(l-«)%  lower  confidence  limit  estimate  for  system 
reliability  is  thus  the  solution  Rs*  to 

E  (^)Rs*j(l-Rs*)N-;i  =  « 
j=W  3 

When  there  are  no  system  failures,  W=N  and  the  above 
equation  collapses  to 
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(45) 


(Rs*)N  =  « 


Rs*  =  («) 


1/N 


Equating  this  result  to  Eq  (44)  yields 


(«)1/N  =  exp(I^ - ) 

X(  [2r] ,l-«) 


(46) 


from  which 


-  x  (  [2r ]  ,  l-«0  ,, 
s  =  — — i  (In  °0 

N(2r] 


(47) 


_  X(2,l-«)  f 

2N  (ln  ) 


(48) 


since  for  any  NL  ,  r=l  because  r  =  max[l,r] 


-  max 


1.0,  (  Z  T.  ) 

i=l 


£  T. 

Z  _i 

i=l  N± 


.  This  reduces  to 


A  A  A  A 

r  =  max [1 . 0, N^T^]  and  s  =  because  only  one  component 

or  subassembly  will  be  adjusted  to  make  a  nonzero  contribu- 

k  A  k  T. 

tion  to  the  sums  Z  T.  and  Z  (Ref  9:45). 


i=3 


i-1  Ni 


If  r=1.0  ,  then  T^N^<1  .  This  implies  that 


Ti  -  N, 
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B. 

A  A  1  A  ^ 

Since  T.  can  be  expressed  as  A.Q.  +  Q. 2 

X  11  a  1 


B. 

AiQi  +  ^  Q.^  <  J- 


^ 

Using  the  fact  that  A.  =  1 


1  2(N . -1 ) 


D  N. 

,  B.  =  i  ,  and 

V1 


Q.  =  _i  ,  the  equation  becomes 
N. 

l 


F±2  +  (2Ni-3)Fi  -  2(Ni-l)  <  0 


(49) 


Re-expressing  the  above  equation  as 


(Fi-l)(Fi+2(N.-l))  £  0 


(50) 


one  can  see  that  the  solution  is  some  Fi  belonging  to  the 
interval  (0,1] 


Since 


B. 

s  =  Ti  =  A.Q.  +  Q.2 


s .  A.  V  . 


i  N 


2N' 


(51) 


Since  Eqs  (48)  and  (51)  equal  s  ,  they  can  be  equated  as 
follows : 


;2  n  x  A,  F.  *  B. (F. *)2 

->  -  -V- +  -^r- 


(52) 
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Rearranging  terms  yields  the  following 


(Fi*)2  +  (2N-3)F.*  +  (N-l )  In  *(X^2,l-cc)>  =  0 

which  is  Eq  (26).  Solving  for  F^*  as  a  function  of  N 
and  yields  the  failures  with  which  F^  can  be  replaced 

F. 

if  Fi=0  in  the  expression  Pi  =  1  -  (Ref  9:45-46). 
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B.  Bivariate  Technique :  Notes  and  Computer 
Program  Listings 

This  appendix  contains  the  computer  program  listings 
for  the  bivariate  technique  plus  the  definitions  of  major 
variables  in  the  main  program  SYSRE.  In  addition,  Table  LVI 
lists  the  execution  times  of  the  bivariate  technique  for 
the  various  numbers  of  simulated  reliability  points  and 
component  sample  sizes.  The  execution  times  are  the  number 
of  seconds  needed  to  perform  one  computer  run  of  the  bivar¬ 
iate  technique  (120,000  words  of  core)  on  a  Control  Data 
Corporation  (CDC)  6600  machine.  It  should  be  noted  that  all 
600  Monte  Carlo  simulations  for  a  particular  component 
sample  size  were  performed  in  one  computer  run  only  for  99 
and  199  simulated  reliability  points.  For  the  cases  involv¬ 
ing  599  simulated  reliability  points,  six  computer  runs  of 
100  Monte  Carlo  simulations  each  were  performed  due  to  the 
excessive  processing  time  needed  for  one  computer  run  of  600 
Monte  Carlo  simulations.  The  execution  times  for  100  Monte 
Carlo  simulations  only  are  thus  listed  in  the  table.  Simi¬ 
larly,  the  execution  times  for  50  Monte  Carlo  simulations  per 
computer  run  are  listed  for  the  various  component  sample 
sizes  when  simulating  999  system  reliability  points. 
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TABLE  LVI 


Bivariate  Technique:  Execution  Times  (Seconds) 


Number  Simulated 
Reliability  Points 

10 

Component  Sample  Size 
15  20  50 

100 

600 

99 

simulations 
per  run 

584 

651 

725 

1201 

1877 

600 

199 

simulations 
per  run 

1469 

1543 

1600 

1800 

2138 

100 

599 

simulations 
per  run 

955 

960 

977 

1044 

1175 

999 

50  simulations 
per  run 

1251 

1260 

1275 

1294 

1373 
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List  of  Major  Variables  for  Program  SYSRE 


AA  =  number  of  samples  censored  from  below  for  component  k 

BB  =  quantity  M  such  that  N-M  samples  are  censored  from 
above  for  component  k 

CC  =  sample  size  of  component  k  before  censoring  (N<500) 

C99( L) 

C95( L) 

C90(L)  for  L  =  system  1,  2,  3,  or  4  ,  the  number  of 

C80(L)  =  times  the  calculated  xx  percent  confidence 

C70(L)  interval  covers  the  true  system  reliability, 

C60(L)  where  xx  are  the  two  digits  in  Cxx(L) 

C50( L) 

ET( 1 ) , ETH(K)  =  estimate  of  the  scale  parameter  for  component 
k 

EKK(l) ,EEK(K)  =  estimate  of  the  shape  parameter  for  compo¬ 
nent  k 

TC(1),TXC(K)  =  estimate  of  the  location  parameter  for  com¬ 
ponent  k 

EK1  =  sample  estimate  of  scale  parameter 
TH1  =  sample  estimate  of  shape  parameter 

EK(K)  =  for  component  k  ,  the  maximum  likelihood  estimate 
of  the  shape  parameter 

TH(K)  =  for  component  k  ,  the  maximum  likelihood  estimate 
of  the  scale  parameter 

LCOUNT(K)  =  counter  for  truncation  of  scale  parameter  for 
component  k 

K,NCOMP  =  number  of  system  components 

NCOUNT(K)  =  counter  for  number  of  component  reliability 
estimates  greater  than  or  equal  to  one  for 
component  k 

NRUNS  =  number  of  Monte  Carlo  simulations  desired 

NUM  =  number  of  system  reliability  points  to  be  simulated 


iL 
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MABOV(K)  =  quantity  M  such  that  N-M  samples  are  censored 
from  above  for  component  k 

MRLOW(K)  =  number  samples  censored  from  below  for  component 
k 

NSAMP(K)  =  sample  size  of  component  k  before  censoring 
(N<500 ) 

R(K)  =  reliability  estimate  for  component  k 

RC(K)  =  true  reliability  for  component  k 

RS(2000,L)  =  array  of  system  reliability  estimates  for 
system  L  ,  L=l,2,3,4 

RUNS  =  number  Monte  Carlo  simulations  desired 

Q1  =  percent  component  sample  size  censored  from  below 

Q2  =  percent  component  sample  size  censored  from  above 

511  =  element  (1,1)  of  the  information  matrix 

512  =  elements  (1,2)  and  (2,1)  of  the  information  matrix 

S22  =  element  (2,2)  of  the  information  matrix 

SB  =  standard  deviation  for  estimating  the  shape  parameter 

ST  =  standard  deviation  for  estimating  the  scale  parameter 

T(500,K)  =  array  of  random  failure  times  from  the  Weibull 
distribution  for  component  k 

TIME  =  mission  time 

TRS(4)  =  true  system  reliability  for  systems  1,  2,  3,  and  4 

V(K,2,2)  =  for  component  k  ,  the  array  of  four  standard 
deviation  elements  of  the  shape  and  scale  para¬ 
meter  estimates  from  the  2x2  variance-covariance 
matrix 

Vll  =  element  (1,1)  of  the  variance-covariance  matrix 

V12  *  elements  (1,2)  and  (2,1)  of  the  variance-covariance 
matrix 

V22  =  element  (2,2)  of  the  variance-covariance  matrix 
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PRO-AM  SYS  =>Z  t  I'JPtJ  T  ,  CU  7°UT) 

(******KC0Mo=N,J)'  ir-;  rr  r  c  v  p  c  N :NT S  IN  SYSTEM 
C*****NUM=N'JN  jE9  Oc  SIMULATIONS  CESIREO 

r*****TI^E=NIssroN  time 

C*****EEK=ESTIMME  CP  SHAPE  PARAMETER  PC'?  THAT  COMPONENT 
C*****£TH=ESTTMTE  CP  SCALE  PARAMETER  FCP  T^rT  COMPONENT 
C»*  *  *  ♦  xC=L3  C  AT  ION  PARAMETER  POR  T-IAT  COMPONENT 
C****«NSAMP=SA  tPL:  S  T7E  E  E  F  0  R  E  C ENSO RI NG <N= 1 l 0  0  ?  LE  IE) 

C  **  **  *MABO'l/  =  OU  ANT  I  f  Y  M  W«c?r  N-M  SAMPLES  CENSORED  FR  CM  AIOVE 
C*****PRLOW=  NUP-5ER  CP  SAf^L^I  CENSODEO  Fprf  ELOw 
01  MENS  ION  T  0 ( SEE)  i E  T  (  5  E  0 )  , FKK ( 5 5  0 )  ,  NS  I ? E (5 ) 

DIMENSION  SC2,2),\/CiO,<,2),RCiO)  ,  N  S  ’  J  <  10  )  , 

CMAOOV  (  10  )  ,MRL0K(1C  )  ,  E  E «  t 1  0  5  ,  £T h  f  1?) ,  T  *C  (  i  I >  ,  th  <  1 3 )  ,  Z«  (  1 
DIMENSION  TRSC  '-.)  ,  RC  CE>  ,RS  (  2  0  00 ,4)  ,C'99C  A)  ,C95C4)  , 

CC90 C 4) ,080(4) , C70 C4),C60<4),C50<4) 

DIMENSION  TCSCC.iO) 

DIMENSION  NC  Ot!NT  (  5  ) 

OIMENS ION  LCQLNT ( 5 ) 

DATA  LCOLNT/C  ,0, 0, C, :/ 

DATA  NCOLNT  /0,0, 0, 0,0/ 

RE  AO* , RUNS, NR DNS 
READ  5  0,  N CO M  P ,  NUM ,  T  I M E 
50  FORMAT C 15,15, F<3. 8) 

PRINT  55 

55  FORMAT (IF  ,17HNO.  CF  COMPONENTS, 5X, 1 8HNO ,  OF  SIMULATION 
C  5X , 12 H MISS  ION  T  IUE) 

PRINT  60  ,NCOKF,NUM,TIME 
60  FORMA  T ( 1 H  ,  7 X , 15 , 1 7X , 1 5, 1 5X , F2 0 .  8) 

CALL  CLOCYCAA) 

CALL  RAN  SET  C  A A ) 

00  25  L=l,4  -  . . . . .  .  - . 

C99CI) =0.0 
C95CL ) =0.0 
C9  0  C  L ) =0.0 

C80CL)  =0.0  — 

C7C(L) =0.0 

- C60(L) =0.0  - - 

C50(L) =0.0 

•  25  CONTINUE  -  - - - - 

00  550  N  >  =  1 , NRUNS 

00  132  K  =  l,  NCCM°  . . . 

IF(NX.NE.l)  CC  TO  66 

. . -  READ  70,NSAMP(K)  .MAPCVOO  ,MRLOWCK>  ,ETM1K>  , - 

CEEMK) , TXC( K) 

70  FORMAT  (  313,  3F0. 4)  -  -  - . 

RCCKI  =  EXP(-C ( (TIME-TxC  <K>  > /ZTH IK) ) **EEK(K) ) > 

PRINT  72  ,K, ETH(K) , EPM( M) ,  TXC (K) 

72  FORMAT  Cl)  ,  9H COMPONENT , 13 , 5X, 6MSCALE=, F8 . 4, 5X , €HSHAPE= , 

*  -CFft.4,5X,oHLDCATIOM=,P8  .4)  . . -  - - 

66  CALL  RAWEIC EEKCK) ,ETH(K) , TXC (K) , TCI, K) ,NSAMP(K> ,K) 

TCC1)  =  T  YC ( K ) 

ETCl)  =ETF(K) 

EKKCl)  =EEMC  K) 

CALL  PARESC  NS.V'PC  <)  3'.'  ('<)  ,TC«  E  T  . 

CEKK,MRLOw  ,IH  CK)  ,  EK  (  K)  ,  T  i  1,  K)  ,NX) 

IF  C  TH  C  K)  .LE.3.1?)  PRINT  2 
2  -  FORMAT  C 1 F  ,13MThETA  LF  ZERO) 
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IF(T|{  K)  « Lr . 3  . )  CO  TO  243 
AA=“RLOW  (  <) 

E.3=MA?  0  J(K) 

CC  =  NS  A  M°  ( t<) 

Q1=AA/CC 
Q2=(CC-  i  'O/CC 

CALL  VACCvm,C2,EK(»0  ,CC,TH(K)  ,  VU,V12,V22) 

A-VI.1 
[j  =  V 1 2 

c=v?? 

Ic  (vl.  2)  110,  ICC,  lie 
ICC  11  =  SOR  T  (Vll  ) 

V( 1, 2) =0. 

V< K,2,  1)  =0. 

V  {  K, 2 »  2)  =  SQRT  (V22) 

V( 1*2) =3. 

V ( 2» 1 )  =  3 . 

V(  2,2)  =  SC°T  (  7 22) 

GO  TO  152 

110  Y=.5*Srm(A*A-?.*A*C4C,,C+4.*3*8> 

X1  =  .S*  (A  40  ♦  Y 
X2  =  . 5  *  (A4C)  -Y 
91  =  SORT  (1,4(X1-A)  **2/0* 2) 

R2  =  SQRT(  1.4-(X2-C)  **2/B**2> 

SC1.1) =1  ./Rl 
S( 2,2) =1  ./°2 
S(  1,2)  =02-0/(3*92) 

S(2,1)  =  (X1-A)/(3*91) 

X1=SQRT(X1) 

X2=SQRT  ( X  2) 

oi=s<i,n*xi  -  --  - - — . 

02=S(1,2  )’X? 

03=S(2, 1)  *X1  -  - 

D4=S(2, 2) *X2 

V  (  K,  1 ,  1)  =01*Stl*l)  4-C2*S(l»2) 

V(K,1 , 2) =  01*S(2,i ) +C2*S<2 ,2) 

*•  V(K,2,1) =C3*S(1»1)4C4*$C1,2)  - - -  -  ' 

V(K,2,2)=G3*S(2,1)+C4*S(2,2) 

132  CONTINUE  - - - 

C*****CALCULATE  TRUp  SYSTEM  RELIABILITIES 

-  TRS(l) =RC(1)*9C(2)*RC(3)  - -  - - - 

TRS (2 ) =  RC(1) * (1. 0-( 1.0-RC  <  2) )*  < 1 ,U-RC( 3) >  ) 

-  TRS  (3)  =  l.C-(  1.  C-RC<  1)  )  M1.0-RC(2))*(  1 .  C-9C  (  3)  > - 

TRS ( 4 )  =  RC(1) * (1,0-(1.0-RC (2) ) * ( 1  .0-RC( 5) * ( 1 • 3 - ( 1 .  O-RC ( 3 ) ) *  ( 1  .C-RC  ( 

. —  C4)  ) ) )  )  ~  - - - - 

IF(NX.NE.l)  GO  TO  133 

DO  140  JJ  =  1,  4  -  •  -  - 

PRINT  141 ,JJ, TRS( JJ) 

-141  FORMAT  ( 1  h  ,  2  7HTRUE  REL  IAB  ILI T  Y  'FOR  S^S  TEN ,  I  2,  2 1  ~=  ,  P3 . 6>~ . . 

140  CONTINUE 

C* *»*»*»,»»»*»« GENERATION  Cp  SAMPLE  VALUE  CP  PARAMETERS  - 

133  00  17  0  J=  1,  NUM 

DO  15  0  K=  1,  NCC^P - - - 

W=°A‘IO°  (  >) 

B  =  9 AN  0  R (  X  )  . . 

ST  =  VCK,  1,  1)  *  W  ♦  V  ( K ,  1 ,  2 )  *b 

SB=V ( K  *  1 »  2) *W4V(K,2,2) *B  -  -  -  - 

-  -135 . -  -  - 


•  ,  r  +'rK  c<) 

E  <  i  - 1  X  -  E  «  ( K  > 

C******.  .,;■■■  -T  I*:,  SA-^LE  V  E  ISULL  COMPONENT  PEL  TA  .*  Ill  TIES 
IF  C  T 1  .LE.'J.  :)  LCOUM  (  k)  =  LCD UN  T  (  K  )  +1 
IFCTH1  .LE.C.'l)  R(K)=J.C 
IF  ( ?  ■  1 1  •  L  i  •  3  •  j)  GO  TO  143 
APG'l  !=-<  (TIME-TXC  (  K)  )  /  1H1 )  **EK  1 
IF  { ‘  ''0  U  M  ,  GT  .  -  2C  •  0  •  /N G  .  £PG  UM, LT  .0  .  0  )  GO  TO  145 
IF(ARSUM.C-S.O.C>  ° CO =1.0 
IF  (  *  "'GOM.LE.-2  J)  R(K)=0.C 
GO  TO  1  *  6 

14  5  R  (  <0  "  !  X”  C  A^GUM) 

14?  IF  <R  "G  >  .GE.  1.0)  NCOUNT (K> =NCOUNT  OO +1 
150  CONTINUE 

P ***** GENERA  T INC  SAVOIE  SYSTEM  RELIABILITY 
RS  ( J* 1 )=° (1) *R (2) *R (3) 

RS(J,2>  =  E(l>Mi.0-(l.C-R(2))+ll.3-S(3))> 

RS  <  J, 3  )  =  1 .  C  -  (  1 . J -R ( 1 )  ) * ( 1 . 0 - R ( 2 1  )  M 1 .  C - R  <  3  >) 

RS  ( J,  4  )  =  F { l) Ml.  C-(  1. C-R( 2)) M 1 • C -E ( 5) Mi.C-(1.0-R(3) ) M 1 . C- ? ( 4)  )  ) 
CM 

17C  CONTINUE 

C#*»**OROERING  SAMPLE  SYSTEM  RELIABILITIES 
00  205  1=1.4 
Mt.  =  l 

175  MH=NUM-1 
1  7f>  MH  T=MH 
ISW=1 

DO  200  I  =  WL, MHT 
11=1+1 

IF(RS  (  I,L)-RS  (II,  L)  )  2  0  3,  2C 3, 130 

180  GO  TO  ( 1  ?5,  19 0)  » ISW  '  - - - - - - 

185  ISW=2 

IF(I-1)1S0,  190,187  -  . . . .  -  -- 

187  ML=I-1 

190  TEMP=  RS  (  I, LI  -  -  -  - 

RS (I, L  I  =  PS< II, L) 

. .  RS(II,l)=TEMP  —  - - - 

MH  =  I-  1 

-  -  200  CONTINUE  - -  - . . 

GO  TO  (2  (5,  176)  ,ISK 

205  CONTINUE  - - - 

IF  (NX  •  NE  •  1)  GO  TO  603 

'  -  READ  320  ,M1, M2,M3,M4,M5,M6,M7 - 

320  FORMAT  (714) 

500  00  510  1=1,  4  - - - 

IFCTRS  (l  ).GE.RS(M1,L) )  C9  9<l)=C9  9(t)+1.3 
IF  (TRS  <1  >  .GE  .RS(M2,L) )  C9  5(L)=C95(L>  +1.0 
IF(TRS (L>  .GE.RS(M3,L) )  C90(L)=C93(L)+1.0 

- IF  (TRS  (L  )  .SE.RS(M4,L>  )  C8C(L)  =  C3ML)  +1.3 - 

IF  (TRS  (l )  .0  E  .  F S  ( M 5  ,  L >  )  C7  C  ( l )  =  C7  3  ( l)  +1.3 

IFfTRS (L  )  .GE  .FS(M6,L> )  C6 0  (L) =C50 (l) +1 .0  - 

IF (TRS (L)  .GE.RS(M7,L) )  C5  0 ( L) = C 5 3 ( L )  ♦  1  . 3 

510  CONTINUE  - - - - -  - . 

550  CONTINUE 

600  CO  610  1=1,  4  -  '  . .  -  - . 

C99(L ) =C99(L)/FUNS 

C95(l)=C65(L)  /CUNS  - 

. .  _ _ 135 _ _  .  .. 


C9C(L)  =  C'3(U  / -UNS 
CSC  (L  )  =C  6  M  L )  /  C'JM S 
C7  0 (L )  =C  7  j  (  L )  /®'JMS 
C6  0  <  L  )  =  CEO<U/RUNS 
C5C(L)  =C53<L>/PUMS 
61 C  CONTINUE 

00  625  L=l,  4 

PRINT  62t,L,C<39(L)  ,C05(L)  ,C90(L)  ,C90<L)  ,C7C«L)  ,C6?(U  ,C5C  (L) 

620  FORMAT  (1H  ,* CONFIDENCE  LEVELS  cOR  S  Y  ?T  £  1  *  , 1 1 , // ♦  in  .PHOT'  LF/EL, 
CFfl.6,/,lE  ,  LE  VEL  ,  F3 . 6, /,  1H  ,5^0*'  LE  VEL,  F-3.  6,  /  , 

CIO  ,9H«QV  LEVEL, r8  ,/ ,1H  ,9h7C7  L  E7  EL  ,  F  «  .  6  ,  / ,  1H  ,  9H  6  0  ’<  LE'/EL, 
CF8.6,/,iF  ,<H5GX  LE  VEL » F8 .6) 

625  CONTINUE 
240  CONTINUE 

PRINT  7  3  0  ,  t  ( K ♦ NCOUNT (  M ) ) , K=l,5) 

700  FORMAT  (IT  ,  "C  CMPONE  NT” ,  13 , 15 ,  "CONPCN  -  NT  PEL  I  AC  ILI  TIES  C-E  1") 

STOP 

END 


137 


FUNCTION  RA*  IQEtX) 

oi^ensiot  x<  20 
j=  0 

1  SUM=0. 

00  10  1=1,12 

X  (  I )  =  R  A  V  r  (X  ) 

SUM  =  S'JM*  X  (T  ) 

10  CONTINUE 
Y=SU*-5,  ( 

RANOR=Y 

RETURN 

ENO 


SUBROUTINE  R AKEI (  EK ,TH ,XC , T, N, K) 
DIMENSION  T  (  5  CO ) 

00  20  1=1, M  . . . . 

Y=RANF  (X) 

Z=-(ALOG  ( 1.  0-Y)  )  . 

Tm=(TH*Z*M1.0/EKmxC 

20  CONTINUE  -  . . . . 

22  ML=1 

MHT=N- 1  -  - - - 

ISW=1 

00  50  I=Mt.»MHT  - 

IF  €T«  I ) -T  CT  ♦  1)150,50,2! 

•  25  GO  TO  (30,40)  ,ISW  - - 

30  ISW=2 

40  TEMP=T(I)  - 

T  <  I)  =  T  (1  +  1) 

T( 1+1) =TEMP  -  -  - 

50  CONTINUE 

-  GO  TO (55, 22) , ISN  - - 

55  CONTINUE 

RETURN  — -  - 

ENO 
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oooooonooooooooaooooooooooo 


sue  routine  p  tr:  ,  r  ,t-  eT .%  i  m  3 .  ’v  t  ,  'jy) 

CIEWF1  HARTER  ITERATIVE  (STIMATION  OF  WE I3NLL  PARAMETERS  101  5  A  F 15  1966 
INPUT 

N=  SAMPLE  SIRE  (-EFCRE  CENSORING)  *  N  =  1 0  I  O3  LESS  AS  DIMENSIONED 
SS1  =  0  IF  SCALE  PARAMETER  THETA  IS  KNCN\' 

SS1=1  IF  SCALE  PARAMETER  Th:ETA  IS  TO  RE  ESTIMATES 
SS2=0  IP  SHAPE  PARAMETER  «  IS  KNOWN 

SS2=1  IF  SHAPE  PARAMETER  K  IS  TO  BE  ESTIMATED 

SS3  =  0  IF  LOCATION  PARAMETER  C  IS  KNOWN 

SS3=1  IF  LOCATION  F4PAPETEP  C  IS  TC  EE  ESTIMATED 

T(I)=I-TH  ORCER  STATISTIC  OF  SAMPLE  (T  =  i,N> 

(SUBSTITUTE  WLAN*  'lAFJS  FOR  UNKNOWN  CENSORED  OBSERVATION^) 
M=NUMEER  Oc  Q  3SERV  AT ICTS  PEMAINTU3  A'TFR  CENSORING  N - M  F?OM  A GOVE 
C ( 1 )  =  I N I  T  T A  L  ESTIMATE  (OP  KNOWN  VALUE)  OF  C 
THETA( 1)  =  INITIAL  ESTIMATE  (OR  KNOWN  VALUE)  OF  THETA 
EK ( 1) -  IN  1TI AL  ESTIMATE  (OR  KNOWN  VALLE)  OF  K 

MR=NUM  BE  R  OF  C.-SERV  AT  I CNS  CENSORED  FRO”  3EL0W,  NORMALLY  0  INITIALLY 
OUTPUT 

N,SS1,  SS2,SS3,M,  C  (  1)  ,T  )ET  A  ( 1)  ,  EK(  1)  ,  M»-*S  AME  AS  FOR  INP'JT 
C( J)=ESTIMATE  after  J-l  ITERATIONS  ( C°  KNOWN  VALUE)  OF  0 
THETA  ( J)  =ESTIMATE  AFtEF  J-l  ITERATIONS  (OR  KNOWN  VALUE)  OF  ThFTA 
EK  ( J)  =  E  ST  IM  ATE  AFTER  j-i  ITERATIONS  (OR  KNOWN  VALUE)  OF  '< 

(MAXIMUM  VALUE  OF  J  AS  PRESENTLY  DIMENSIONED  IS  55?) 

EL=NATURAL  LOGARITHM  CF  LIKELIHOOD  cr)R  C  (  J)  ,  TH  ETA  (  J)  ,  EK  (  J  ) 
REFERENCE 

HARTER,  H.  LECN  ANT  MCCRE ,  ALBERT  F . ,  MAX IMUM-LIKELIHOOO  ESTIMA¬ 
TION  OF  THE  PAPAMETEFS  OF  GAMMA  AND  VEInULL  POPULATIONS  Fn0M 
COMPLETE  ANC  FROM  CENSORED  SAMPLES,  TECH  NOMETRICS,  7  (l°6*)f 
639-643.  ERRATA,  9  (1967),  195 

DIMENSION  T  (  5  00  ) ,  C  (55  0  ),  THETA  (550  ,EK(  55  D)  ,  X  (56)  ,  Y  (55) 

SS1=1 .  .  .  - 

SS2=1. 

SS3=0  •  ~  -  . .  —  -  . . . 

IF  (N)  66,  66,  104 

104  EN=N  •  '  -  - 

IF  (M)  66,  66,  11C 

110  EM=M  - -  ~  - 

31  ELNM=0  . 

-  EMR=MR  -  - — . 

MRP=MR+1 

33  NM=N-M  +  1  - — - - - 

00  34  1  =  NM, N 

34  ELNM=ELNM+ALOG(EI) 

. .  IF  (MR)  66,  35,74  - - -  - -  - 

74  00  75  1=1, MR 

EI  =  I  - -  -  . - -  -  •- 

75  ELNM=ELNM-ALOG(EI) 

—  35-  00  30  J=  1,550  - - - 

IF  (J-l)  66,25,37 

37  JJ=J-1  - - - -  -  . 

SK=Q. 

*  -  SL  =  Q.  . — - - - - - 

DO  6  I  =M  5 P,  M 

6  SK  =  SKMT  (I)  -C(JJ)  )  *  *EK  { JJ  ) 

IF  (SSI)  7,7,4 

7  THETA( J)=THETA(JJ)  -  - - 
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GC  TO  9 

3  ip 

19  THETA  (  J»  =  (<  SKMEN-E*  >*  <T(M)-C<  JJ>)  **5<<  JJ))  /  EM)  **  <I./EK(  JJ)  > 

GO  TO  9 

20  X<  1)  =  THETA<  JJ) 

LS  =  0 

00  21  L=l,55 
LL  =L - 1 
LP-L* 1 
X  ( l p )  =  X  (  L  > 

2P‘--(  (  l(PP)  -C<  JJ)  >/*((.))  **£'<(  JJ> 

Y(L)  -  -  E!  K  (  JJ)  *{"’<-£  MR)  /  ML  )  *E  <(  J  J  )  *  S  <  /  *  <  l_ )  **(E<(JJiH.)«-G1<(JJ)*  E'J- 
1EM)  *«  T  (  *)  -C  (JJ) )  **EKt  J„)/X(L)  **(EM  JJ)  *1  .)  -F«R':X(  JJ)  *7r<  *2  X°  < -Z** 
2)/ <X<  L ) M l.-EXP(-ZPK) ) J 
IF  <Y (L>  )  53,73,54 

53  LS=LS- 1 

IF  (LS+L)  58,55,58 

54  LS=LS*i 

IF  (LS-L)  5  3,55,58 

55  X(LP) = .5 «X< L) 

GO  TO  61 

56  X ( Lp) = 1 • 5*X ( L ) 

GO  TO  61 

58  IF  imi»Y(LL)l  60,73,59 

59  LL  =  LL-1 
GO  TO  5  3 

60  X  ( LD)  =  X(L) *  Y ( L) *  (  X  <  L  > -X ( LL) ) /(Y(LL)-Y(L) ) 

61  IF  (At3S(X<Lp> -X<L))-l.E-4)  73,  73,  21 

21  CONTINUE 

73  THETA ( J) =X( LP) 

9  EK(J)=EK<  JJ)  - - - 

10  IF  (SS2)  12,12,11 

11  00  17  I=MRP, *  - 

17  SL=SL ♦ALCG(T(I)-C(JJ>) 

Xm*EK(  J)  -  -  •••' -  -- 

LS  =  0 

-  00  51  L=i,55  - - -- 

SlK=0. 

*  00  18  I  =  M?P, 9  -  - - 

18  SLK=SLK+ (ALOG(T( I ) -C< JJ) ) -ALOG ( T  FETA ( J )  ) ) * ( T ( I ) -C ( JJ) )  ** X ( l ) 

U=L-i  -  - 

LP=L*1 

-  X(LP)=X(L)  -  - 

ZRK=< (T (Mop) -C( JJ)  )/TH  ETA ( J) ) **X ( L) 

Y(L)  =  (E‘1-EMP)  M  1 .  /  X  (  L )  -ALOGlTHETAtJ)  ) )  H>L-SLK/THETA(J)  **  X  (L)  MFN- 
lEH)»(AL0G(THETA(J))-ALCG(T('-1)-C<JJ)))*(T{M)-r(JJ))**y(L>/T-ETA<J> 
2**  X (L )  +  Etf9*Z3l<*(ALCG(ZcK)/X(L)  )*EXp(“7c<>/(l.-EXp<-ZpK)  ) 

IF  (Y(U)  43,52,44 

43-  LS=LS- 1  - -  - 

IF  (LS+L)  4  7,  45,47 

44  LS=LS  ♦  1  - - - 

IF  (LS-L)  47,46,47 

45  X(LP)=  ,5«Y(L)  - 

GO  TO  5] 

46  X(LP)=1.**X(L> 

GO  TO  50 

47  IF  (Y(U*Y(LLJ)  49,  52, <8  -  -  - 
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48 


U=LL-  I 
GO  TO  4  7 

49  X  ( lr>)  =  X  l  L  M-Y  (  L)  *  (  X  ( L )  -X (L  L )  )  /  ( Y  f  LL ) -Y ( L )  > 

5C  IF  (ACS  (  x(LP) -X(L)  )-l.E-4  )  52,52,51 

51  CONTI N UI 
5?  E<  <  J)  =  X  (  L  °) 

12  C(J)-C(JJ» 

6?  Ip  ('S3)  25,25,14 

14  IF  (l.-FK(J))  16,78,73 

78  IF  (GGl^SS?)  57,57,16 

16  X(1)-S(J) 

IS  =“ 

00  23  L= 1 , 55 
SK  1  =  0  . 

sr=o. 

00  15  I=MO°,M 

SK1=SK1+ (T( I) -X(t > >♦*( rK< J) -1. > 

15  SR=SR+1./(T(I)-X(U) 

LL=L- 1 

LP=l+l 
X  (  LP>  =  X  (  L ) 

ZRK=( ( T (M^P) -X(l) )/THETA<  J) ) **EK( J) 

Y(l)  =  { 1 .  -  EK<  J)  >  *FK(  J)  *  (  S\'l  +  (  FM-fM  *  (T  (M)  -X  (  L) )  **  (  FK<  J)  -  j  . )  > 
1/ThET  A  (  J)  »*EK<  J)  -FMQ  *EM  J)  *ZRK*F  XP  (-7RK)  /  (  <  T  <MRP)-X<L>  )  M  1  .-E>P 
Zt-ZRK) ) ) 

IF  ( Y  (  L)  )  30,24,40 

39  LS=LS-1 

IF  (LS+L)  73,41,70 

40  LS=LS*1 

IF  (LS-L)  70,42,70 

41  X ( L°)  = .5*X(L>  *  -  -  - . 

GO  TO  22 

42  X(LP)=  .5*X(L)  ♦,5*T(1)  - - ----- 

GO  TO  22 

70  IF  (Y(L)’Y(IU)  7  2,24,  71  -  - 

71  LL=LL- 1 

GO  TO  70  -  - - - - 

72  X(LP)-X(L)+Y(L)MX(L)-X(ll))/(Y(LU-Y<U) 

22  IF  (ASS(HLP)-X(L)  )-l.E-4>  24,  24,23  - - 

23  CONTINUE 

24  C(  J)=X  (LF)  - 

GO  TO  25 

57-  '  C(J)=T(1  ) -  - 

25  IF  (MR)  66,33,69 

38  00  63  1=1, M  -  -  - 

IF  <C<  JMl.E-4-T<  I>>  6  (,67,67 

67  MP  =  MR*  1  -  - -  -  - 

63  C(1)=T(1) 

68  IF  (MR)  ee,  69,31 - 

69  SK=0. 

00  36  I=MRP,M 

SK=SK*  (T(I)-C(J))**EK(J)- - 

36  SL=SL ♦ ALC ' ( T (  I) -C ( J) ) 

2RK=(  (  T  (►'’**)  -CM)  >/  T»ETA(  J)  )**=•<{  J» 

EL=ELNM  +  (FM-EMR) * ( 7L9C  (EK ( J) ) -EK( J) *£LCG(THE  TA( J) ) ) ♦ (t K( J) -1.) *SL 
l(SK  +  (EN-EM)*(T(M)-C(J))*#EK(J))/(THElA(J)**EX(J))*EMR*ALOGil.-EXP 
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2 C-ZRK)  ) 

150  IF( J-3> 3C,?*, 27 

27  IF  (ABS(C(J) -CIJJ) >-1.5-4)  28,28,30 

28  IF  U3S(  THETA(J)  -THETA(JJ)  J-l.E-4)  20,29, 30 
29  I F  (  AC  9  <  E  K  ( J )  -  £  K  (  J  J )  )  -1  .£-4)  126,  126*3  0 

30  CONTINUE 
126  PTH  =  T  ■'ETA(J) 

PZK-C.<  (  J) 

GO  TO  14  0 
66  Pan?  13  5 

1  36  c  C  f'MA  T  (II-  ,  2  Jl-  ALL  SA“CLES  CENSOREC,/) 

PEK=0. 

PTH-0 .  - .  -  ' - 

140  CONTINUE 
RETURN 
ENO 
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S'.r  sou tin?  vacoviqi.o?  ,e<,  G‘iuM,TH,sii,ri?,G2?) 

J  0 

lc<Qi.EQ.t.)r,c  to  1 
IF<02.  EO.l.JGC  TO  1 
GO  TT  .1 

1  ppj*|T  2 

£  FOP MA  r  (  1H  t  1  4H  ALL  K  OE  (SO RED) 

GO  T  27 
?  CONTI/:  UE 

I r  O  !  .20,2.)  GO  TO  4 

?*?  =  (- A LOG(l.OC-Ql)  )  *  *  <  l.GG/EK) 

FL7R=EK*2R*MEK-1.  C0>  *  EXP(-ZR**EK) 

GO  TO  5 

4  ZR  =  0.3 
K=  1 

01*1.  e-2«» 

5  IF<Q2.E0.3.)G0  TO  7 
ZM=(-ALO  f  (02)  >**(1  .C^/EK) 

GO  TO  8 

7  ZM  =  4Q.O 
J=1 

Q2=1.E-? i 

8  P=1.00-Q]-Q2 
IFtJ.EQ.  OGO  TO  14 

V11  =  -EK*F+EK*  (EK+1  .3)  *GAMI  <ZM**EK,  2.  G>  ♦EKMEK+l.  3) 

C  *Q2*ZM**EK 

V22=P/ EK * *2 +  0  2G A  MI <ZM*«EK, 2.  00  )  /  EK  **  2<-C2*ZM**EK*  A  LOG  (  ZM)  **£ 

V12=P-  OG  AMI  <  7M**  EK,2.C  )-C-AMI  <ZM**EK,  2.0 
C  -Q2*Zf'**EK*(1.0C+EK*ALOG(ZMn 

GO  TO  17  . .  '  - - - -  ‘ 

14  V11=-£K*P*EKMEK+1.  05 

V22=P/EK**2+020AM(2. 00>/EK**2 
V12=P-0GAM<  2. 3)-i  .  C 
17  IF  (K.  EQ.  1  )G0  TO  24 

V11=V1 1+  <-EK*  (EK+  1 ,  0)  *G AM  I ( 7R*  *EK .  £.  *)  +01*ZR 

...  c  *FL?R*  (£k*7R**E'<-(EK+1. 03)  *00/01**?)  . . — . . 

V2  2=V22-O2GAMI(ZR**E'<,2.00>/E;<*¥2*Ci*ZR<'c'L7R*AtOG<Z?>**2* 

C  <  ZR**EK-Q1>  /  <  ?K*01**  2)  -  - 

V12=V12  +  QGAMTC7R**EK,2.C)  +GAMI (ZP**EK.2.3)-Q1 
C  *ZR*Pl?R*  <  E><*ZR**SK*ALOG<ZR)  -<EK*ALOG  (7R)»1.30)*01)/(E«*01**2) 
24  D=Vil*V22-\/ 12**2 

- S11=V22/C  -  - - 

S12=-V 12/D 

S21=S  1 2  - -  -  — 

S22=V1 1/0 

S11=S1 1* (TH**2)/SNUM  -  -  - 

S12=S12*TH/0NUU 

S22= >  2  2  * ( 1 • / SNUM) -  - 

27  CONTINUE 

return  -  - -  - - 

ENt) 
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1 


3 


F'JNCT  ICN  GAM(  V) 

7- Y 

G  =  u .  *•  3 

Tc  (7-n.CC)  2,2,3 

5  =  r.-.iL0GCZ) 


Z=Z<  '..on 
GO  r;  i 

GAM  =  '  -  (  Z  «.F0  3)  *ALOG(  7)  -7  +  .^00*  AL  OG  (  2.0  j  *  3.  14  15926535  <59  7)  ♦  l  .0/ 

C  ( 12.  v  7  )-l.  CC/(  36 C.  -3G*Z*  *3)  H.  3  C/(  1  2G  C  . 0 C  * Z* * 5)  -1.  3?/  <  1  *=•  8  C  .  i 
C7H-1. 0J/<1133. 30  *Z**9> -69 1.3  0/ <36336;. G0*Z»*11>+1. 00/(1  56. 3  :!*Z**13 


C) 

GAM=  EXP(GAN> 

RETURN 

ENO 


FUNCTION  COAM(Y)  . 

Z=Y 

OG  =  0 . 0  0 

1  IF  <7-9.  (0)  2,2,3 

2  OG=OS - 1 .  C3/Z  . - 

Z=Z+1.00 

GO  TO  1  ■  '  -  -  - - - - - 

3  OG AM=OG  ♦  ( 7  -  . 5CC)/7+A|_CG(Z) -1.0  C-  1 , C  3  /  ( 12.00*7**2)  ♦  1 • 0  0/ ( 12j.03*Z¥* 
C  4)-1.09/(252.00*Z*,‘6)*l. 30/(243. ijO*?**1?)-!.  00/(132. 3C*?**13> 

C  ♦691.00/(3276C.C3,,Z**12)-1. 00/(12. 03*Z**lt) 

OGAN=OGAf'*GAM(YJ  -  - 

RETURN 
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FUNCTION  C2GAMIY) 

Z  =  Y 

O2G=0. 00 

1  IF  (7.-o  4  CO)  2,2,  7 

2  C2G=O2C-M.03/Z**2 
Z=Zfl. 03 

GO  TO  1 

3  D2GAM=02C*i.  S  0/Z  ♦  1  .  0 '.  /  <?.  00*Z**2)+l.:C/(f5.C0*7**3)-l.L'./v 

C  5)  <1.0  3/  U2. 0  :*7«*7  )  -1.3  C/  (30  .  ?C  *7**0)  *5.  0:/<G6.  3!  *  ^  r 

C  -691.Cl)/(  27  30.C:*Z**l3M-7.0G/<6.:a*Z**15) 

02GAM=  (02GAM*G AM  (  Y)*#2«OGAM<Y)**2>/GAM<Y> 

RETURN 

END 


FUNCTION  GAMICW.Z)  . 

DIMENSION  '1(50) 

u(i)  =  w**z/z  -  .  — 

SU=U( 1  ) 

DO  1  L  =2  i SC  -  ' 

LL=L- 1 

-  ELL=LL  . . . . 

U(L)  =  (-U  ILL )  X  ELL)  * K *  (  Z  «El  L -1 .  C  0)  /  (  7*  ELL ) 

1 -  SU=SU+U(L)  --  -  - 

GAMI=SU 

RETURN  -  - - - 

END 


145 


FUNCTION  00  AMI (W, 7) 

DIMENSION  U(  SO)  ,  V  <  E3) 

U(l)=W**Z*ALOG<W) /Z 
V(U=W**Z/?**2 
SU  =  '.)(  1  )  -V  (1) 

00  1  L  =  ?,5C 
LL=L-  1 
ELL=ll 

U(L)  -  <  -■)  (LL)  *W/ELL)  *  (  Z+ELL-i. 3  0)  /(Z*ELL) 

V(L)  =  —  V  C  LL)  *Wv(Z*ELL-l.k;0)  **2/  (  (  Z ♦ ELL)  *  *  2*  E  LL) 
SU=S'JfU(L)-V<L> 

OG  AMI  =  S'J 

RETURN 

ENO 


FUNCTION  OZGAMICW,?)  ’  ~  - - 

DIMENSION  U<50)  ,V<5C)»><50) 

U(i)=W**Z*ALOG<W) **2/Z  . *  — •  ’ 

V(i)  =  2 . 3  C*N**Z*ALOG  <N)  /Z**2 

X(i).=  2.0  0nJ**Z/Z**3  — . -  -  ' 

SU=U(1)-V<1) +  X(1) 

DO  1  L  =2  »  50  - - 

LL=L-1 

ELL=LL  - -  - - - 

U(  L)  =-  U (  LL) *W*(Z*ELL-1 .00) /( (Z+FLL) *ELL) 
V<L)=-V(LL)*N*(Z«-ELL-1.00)**2/(<Z*ELL>**?*ELL> 
X(L)*-X(LL) *W*(Z*ELL-1.G0) **3/ C l 7*£LL) **3*ELL) 

SU=SU+U(L)-V(L) +  X (L) . 

02GAM I=SU 

RETURN  ‘  - 

END 
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C.  Univariate  Technique :  Notes  and 
Computer  Program  Listings 

The  values  of  the  seeds,  T  and  DSEED,  used  to  generate 
random  numbers  in  the  univariate  technique  are  presented  in 
Tables  LVII  and  LVIII.  The  same  seed  values  were  used  for 
the  univariate-normal  case,  the  univariate-beta  case,  and 
when  applying  Gatliffe's  technique  to  the  univariate  method. 
As  stated  in  Section  III,  the  same  seed  values  were  used  so 
that  only  the  underlying  distribution  of  component  relia¬ 
bility  estimates  varied. 

The  variable  T  is  real  in  type.  The  variable  DSEED 
is  double  precision  in  type  and  has  the  format 

XXXX.ODO 

where  XXXX  is  one  of  the  integer  values  presented  in 
Table  LVIII.  DSEED  and  T  are  used  in  the  generation  of 
Weibull  random  deviates  and  normal  random  deviates  in  the 
univariate-normal  technique  and  in  the  generation  of  Weibull 
random  deviates  and  beta  random  deviates  in  the  univariate- 
beta  technique.  The  code  for  each  technique  is  also  pre¬ 
sented  in  this  appendix. 

The  computer  programs  for  the  univariate-normal  and 
univariate-beta  cases  differ  only  in  one  section  of  the  main 
program  WEIB.  All  subroutines  for  both  cases  are  exactly 
the  same.  Therefore,  a  listing  of  the  entire  computer 


147 


TABLE  LVI I 


Values  of  Variable  T 


Number 

Simulated 

Component  Sample  Size 

Points 

10 

15 

20 

50 

100 

100 

6867 

108 

3049 

384 

2344 

200 

3730 

6510 

6063 

7602 

5202 

7972 

517 

7905 

9432 

3260 

3860 

8931 

6779 

9168 

7978 

600 

1763 

5397 

7486 

1085 

8492 

5675 

2501 

7238 

945 

7257 

283 

3170 

7628 

7272 

3355 

5269 

5173 

1169 

1644 

9747 

6403 

7840 

4341 

5716 

979 

9776 

6306 

7834 

4311 

8221 

1000 

9474 

3971 

1460 

3333 

9261 

7860 

6048 

9334 

5972 

6755 

4165 

4673 

1204 

4086 

3268 

7176 

9250 

7116 

6098 

4207 

2883 

882 

4311 

2741 

2020 

6904 

7242 

1157 

9490 

1043 

program  for  the  univariate-normal 

case  is 

presented 

first . 

Following  this 

is  the 

listing  of 

the  main 

program  WEIB  for 

the  univariate-beta  case  with  the  differing  lines  of  code 
boxed. 
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TABLE  LVIII 


Values  of  Variable  DSEED 


Number 

Simulated 

Points 

10 

Component  Sample  Size 

15  20  50 

100 

100 

2361 

698 

1589 

3767 

4576 

200 

5955 

382 

6711 

2158 

9463 

6630 

3751 

9314 

5353 

4723 

4334 

928 

9783 

5313 

5105 

600 

7966 

4678 

3327 

1810 

9342 

9660 

5234 

8405 

7590 

4618 

6404 

5648 

6083 

3047 

4767 

8712 

5744 

7522 

4733 

199 

6771 

162 

6466 

8113 

5352 

8101 

107 

8834 

5384 

3958 

100 

4992 

5086 

5185 

1301 

3868 

8902 

9260 

5122 

2116 

9596 

4112 

6666 

7778 

9289 

6567 

1325 

6555 

25 

2252 

2434 

6531 

515 

3757 

7600 

7370 

7413 

3172 

6935 

9563 

4330 

These  programs  were  run  on 

a  CDC  6600  machine. 

They 

occupy  140,000 

words  of  core  and 

vary  in  execution  time. 

The  execution 

times  for  each  computer  run 

are  listed 

in 

Table  LIX  by  number  of 

simulated 

points,  type  of  univariate 

technique,  and 

component  sample 

size.  For 

any  given 
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TABLE  LIX 


h 


Univariate  Technique:  Execution  Times  (Seconds) 


Number  Simulated  Component  Sample  Size 

Reliability  Points  10  15  20  50  100 


100: 

600  simulations 
per  run 


Normal 

383 

456 

519 

919 

1578 

Beta 

335 

389 

452 

796 

1684 

200: 

200  simulations 
per  run 

Normal 

146 

168 

188 

306 

491 

Beta 

135 

151 

171 

283 

470 

600: 

100  simulations 
per  run 

Normal 

126 

137 

148 

209 

306 

Beta 

108 

114 

123 

185 

279 

1000: 

100  simulations 
per  run 

Normal 

179 

187 

200 

257 

359 

Beta 

145 

149 

159 

217 

314 

component  sample  size,  all  600  Monte  Carlo  simulations  were 
made  in  one  computer  run  for  the  case  of  100  simulated 
points.  Execution  time  ranged  from  383  seconds  for  a 
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component  sample  size  of  10  to  1578  seconds  for  the  compo¬ 
nent  sample  size  of  100.  Because  of  the  large  amount  of 
execution  time  required,  three  computer  runs  of  200  Monte 
Carlo  simulations  each  were  performed  for  the  cases  of  200 
simulated  reliability  points  and  six  computer  runs  of  100 
Monte  Carlo  simulations  each  were  performed  for  the  cases  of 
600  and  1000  system  reliability  points  in  order  to  obtain 
the  600  Monte  Carlo  simulation  run  results.  Thus,  the 
tabled  execution  times  are  not  the  times  required  for  the 
600  Monte  Carlo  simulations  except  in  the  case  of  100  simu¬ 
lated  points.  This  also  explains  the  varying  number  of  seed 
values  listed  in  Tables  LVII  and  LVIII.  For  example,  in  the 
case  of  600  simulated  reliability  points  for  a  component 
sample  size  of  10,  six  computer  runs  of  100  Monte  Carlo 
simulations  were  made  for  the  univariate-normal  technique. 
Each  of  the  six  computer  runs  required  new  values  for  T  and 
DSEED  (thus  six  for  each  variable  are  listed)  and  126  seconds 
of  execution  time. 
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PROCkA  M  W£IB  (INPUT,  0  LTPUD 

f  *  •  *  *4  ***#»*•**# 

f  •'* 

C  ♦  FOR  EACH  COMPONENT  OF  A  COMPLEX  SYSTEM,  THIS  PROGRAM 
C  ♦  GENERATES  A  SAMPLE  OF  SIZE  MSA  M  FROM  - T Hf  WEIBULL  DISTRIBUTION  -  - 
C  *  USING  THE  TRUE  PARAMETERS  TK  (SHAPE),  TTHETA  (SCALE),  AMO  TC 
C  *  (LOCATION).  FROM  THIS  SAMPLE,  THE  MAXIMUM  LIKELIHOOD 
C  *  ESTIMATORS  (MLES)  FO»  K  AND  THETA  ARE  DERIVED  USING  HARTER  v 
C  *  M CORES  ITERATIVE  SCHEME  ANO  THE  SIMULTANEOUS  EQUATION  SOLVER 
C  ♦  Z SYS T *  •  THE  MLES  ARE  COMBINED  TO  YIELD  RCHAT,  THE  ML E  FOR  THE 
C  *  COMPONENT  RELIAMLITY.  GIVEN  THE  RELIATILITY  AND  THE  SAMPLE 
C  «  SIZE  ..SAM,  RCHAT  Is  ASYMPTOTICALLY  NORMALLY  DISTRIBUTED  WITH  A 

c  *  specified  variance,  therefore  we  can  sample  from  the  normal 

C  *  DISTRIBUTION  TO  OBTAIN  A  VECTOR  OF  SAMPLE  COMPONENT 
C  *R£LIABILITI£S .  THIS  P &OCESS  IS  R£P£AT£0  cOR  EACH  COMPONENT 
C  «  AND  THEN  THE  RELIABILITIES  ARE  COMBINED  FOR  •>  DIFFERENT  TY»ES 
C  ♦  OF  SYSTEMS  TC  YIELD  4  VECTORS  OF  SAMPLE  SYSTEM  RELIABILITIES. 

C  *  THESE  VECTORS  ARE  ORDERED  AND  THEN  THE  55,  90,  AND  33  PERCrNT 
C  *  LOWER  CONFIDENCE  LIMITS  ARE  PICKED.  THIS  ESTABLISHES  THE  95, 

C  *  90,  AND  80  PERCENT  CONFIDENCE  INTERVALS  rOR  EACH  SYSTEM  AND  IT 
0  *  IS  NOTED  WHETHER  EACH  OF  THESE  INTERVALE  CONTAINS  THE  TRUE 

C  *  SYSTEM  RELIABILITY. 

C  *  THE  ABOVE  PROCESS  IS  REPEATED  FCP  NOLMC  MONTE  CARLO  RUNS,  WITH 
C  *  COUNTERS  FOR  EACH  SYSTEM  TO  TRACK  THE  NUMBER  OF  TIMES  TH  ‘ "  THE 
C  *  CONFIDENCE  INTERVALS  CONTAIN  T  HE  TRUE  SYSTEM  RELIABILITY 
C  * 

£  V- ♦*♦*♦♦♦*»*♦■**♦■ -**»-»**.J»*#*  4  *4 

C 

- OJ MENS  ION  CC (550  )  ,TH ET A <55 0 ) , EK <5 50> - 

DIMENSION  ARCHAT(20 00,5) ,  ATRS(4),  BI(12,15),  C(4,4),  DEV 

- t~  (200),  PAR  AM  (3, 5) ,  R(500,5)  ,RC<  20  3  ,  5), RCHAT  - -  - 

2  (5),  RLbS  ( 12 ) ,  RS  (  10  0),  SIG(12,15),  SIGSQ 

- 3  -(12,15)  ,  SMSZ(15) ,  TEMP  (200),  TRC(5)»  TRS(l), - 

4  WK( 200) 

- DOUBLE - PRECIS- 10  NO  SEED - 

REAL  KHAT 

- OAT  A - RLBS  /  .5,  .-55, -i  6, -.65,  .7,- .75 ,  -.8,  - . 85, -.9 , -  .925,  .«5, 

1  .98  / 

C - 

DAT  A  SMS  Z  /  8.,  9.,  13.,  11.,  12.,  17.,  14.,  15.,  20.,  25., 

- 1 - 38vi — *rOv  i — 50t7 — 7  5.~, — 100v~7 - 

C 

C  INITIALIZE  VARIABLES - 

PI  * 4  .  *  ATAN  (i.) 

- READ*,  OSEEC  ,T - - 

CALL  RANSET  (T) 

- TIME - =  100. - - - 

NRLBS  =  12 

- NSMSZ - =15 - -  -  - 

NSMSZ1  =  NSMSZ  -  1 

- .  NRLBS1  “=  NRLBS  -  1  - -  -  ~  -  - 

ISO  =12 

- NJTRUNC - -=0 - - 

LTRUNC=0 

NS1C99  =0  ---------  -  '  - 

NS1C95  =0 


o  o  o  o  o  o  oorl  ion 

it.: 


NS1C90  =  0 

-  -  NS1C80  =0  -  - ^  - - -  -  -  - . 

NS1C70  =0 

-  NS1C6C  =  0  - - - .  - 

NS1C50  =0 

NS2C95  =0 

NS2C90  =0  - - — - -  -  - . - . 

NS2C80  =0 

NS2C70  =  0  -  -  -  - 

NS2C60  *  0 

NS2C50  =  ')  --  - - - -  - 

NS3C99  =0 

NS3C95  =0  -  - - -  -  - 

NS3C90  =  0 

- NS3C30  =0  . — - — -  - 

NS3C70  =0 

NS3C50  =3 

-  NS4C99=0  - - - -  -  - -  - - - 

NS4C95  =0 

- - - NS4C90  - -Q - - - 

NS4C60  =3 

NS4C73  =0  . -  -  - - - - -  -  - 

NS4Cb0  =0 

—  -  NS4C50  =0  - - 

c 

- PRINT  409  - - -  - -  - - -  - 

C  HEAD  THE  SAMPLE  SIZE  AN  C  NUMBER  OF  MONTE  CARLO  RUNS 

- READ*,  NMCT,  ISIMT,NPTS - 

REAQ*»M1,M2,M3»M-,,M5,M6»M7 

- - - READ  *,  NSAM,  NOLMC - 

PRINT  419,  NSAM,  NOLMC 

- RNSAM  ‘  =  NS AM  -  - - 

M=NSAM 

- MR-  0 - 

C  REA  0  THE  TRUE  COMPONENT  PARAMETERS 

- READ  t  (PARAMd,  J),  1=  1 ,  3  ) ,  J=l,  5) - 

PRINT  429,  ((J,  l P  ARAM( I  ,  J),  1=1,  3),  C MPREL ( TIME , PA  RAM ( 1 ,  J| , 

- 1 — PARA  M(2  ,  J),  PARAM  13,  J))),  J=l,  5)“  - - - - 

READ*, (<SIG(I,J) ,J=1,15>,  1=1,12) 

- RE"AO*T t(BI(I,J),J=l,  15)  ,1=1,12) - 

PRINT  439,  <(SI3(I,  J),  J=l,  15),  1  =  1,12) 

- PRINT  439,  ((BKI,  J),  J=l,  15),  1  =  1,12)  “  — - - 


— THIS-OUTSIDE  LCCP  FROM  HERE  TO  STATEMENT  •  300  'COMPLETES 
NOLMC  MON  IE  CARLO  RUNS  CF  THE  SIMULATION. 

DO  300  NCOUNT  =  1,  NOLMC 


I- OR  EACH  OF  5  COMPONENTS,  THIS  LOOP  GENERATES  THE  MlE  )-  RCHAT 
M  ROM  THE  MLE S  CF  <  A NO  THETA.  IT  DETERMINES  THE  VARIANCE  O" 
RCHAT  AND  THEN  SAMPLES  FROM  THE  NORMAL  DISTRIBUTION  FOR  NOEV 


ooooo  n  on  i  o  o 


r  - - 

simple  reliabilities  of  each  component. 

DO  290  J  alt  5 

—  -  TK  a  PARA M  ( 1  ,  J)  -  — 

TTHETA  3  PHR&M12 1  J ) 

-  -  TC .  -  a  PAR  AM  (  3  ,  J)  - — - 

PASS  INFORMATION  ON  COMPONENT  NUMBER  ANO 

-  sample  size  THRU  ARRAY  R  - - - 

R(?Q5,  1)  =  J 
R(2-:<4,  J)  =  NS  AM 

DETERMINE  ThE  TRUE  COMPONENT  RELIABILITY 

T  RL  <  J)  aCMPRELt  TIME,  TK,  TTHETA,  TC) 

OAT-iFR  nsam  failure  times  from  the 

WEIdULL  DISTRIBUTION  WITH  TRUE  PARAMETERS 
TK,  TTHETA,  ANC  TC 

- CALL  GCWI8  ( QSEE  D,  TK,  NSAM,  TEMP)  - - 

DO  20  I  =1,  NSAM 
P(I,  J)  =TTHETA  ♦  T  E  MP  <  I)  «■  TO 
2J  CONTINUE 

C  DETERMINE  THE  LIKELIHOOD  OF  DRAWING  THIS  SAMPLE 
C  USING  THE  TRUE  K,  THETA,  ANO  C 

C  DETERMINE  THE  MLC  OP  THETA  ANJ  K 
C  BY  HARTER  i  MOORES  ITERATIVE  SCHEME 
C 

- CC(  iJsTC  -  -  -  -  - . -  . - 

THETA(1)=  TTHETA 

- £K<1)=  TK  - -  -  -  -  -  •  -  - . 

CALL  PARES (NSAM,  M,CC, THETA, EK, MR, THAT, KH AT, R(1,J) ) 


|  - C— -DETERMINE  RCHAT,  THE  ML  E  OF  THE  COMPONENT  RELIABILITY,  USING  - - 

'  C  THE  TRUE  C  ANC  THE  MLES  OF  <  AND  THETA 

| - RCHAT  (J) — a-CMPR£L(TIM£,— KHATr'THAT,-TC) - 

!  C 

1 - C GIVEN  THE-MLE  -  CFTHE  COMPONENT  RELIABILITY  AND  THE  S  A  M5L  E  SIZE, 

!  C  ENTER  THE  2  -  0 1  MENS  I  ON AL  ARRAY  BI  AND  FIND  THE  BIAS  OF  THE 

j  - C - ESTIMATOR - — - - - 

[  00  50  I  =1,  NSMSZ1 

!  - tSMSZ - =1 - 

IF  (RNSAM  ,LE.  SMSZ(I*i)>  GO  TO  60 

-63 - CONTINUE - 

GO  TO  90 

-69 - IF  (RCHAT  (J)  ,LT  .  -.5)  GO -TO-  190 - 

DO  7 u  I  =1,  NRLBS1 

- LRLBS - a  I - - 

IF  ( RCHAT ( J )  .LE.  RL3S ( I ♦ 1) )  GO  TO  80 
-  -  70 - CONTINUE  -  - . .  —  -  -  '  - - - 

GO  TO  90 

- 8$  CALL  IBCICU  (Ul,  I SD,  RLBS,  NRLBS,  SMSZ,  NSMSZ,  LRLBS,  LSMSZ 

1  C,  WK,  IER ) 

- C ALL.  IUCEVU  (RLSS,  NRL3S,  SMSZ,  NSMSZ,  LRLBS.-LSMSZ,  C, - 

1  RCHAT ( J  ) ,  RNSAM,  BIAS,  IER) 

.  . . IF  (LRlBS  .LT.  NRLES)  GO  TO  119  -  -  -  - 

99  BIAS  =0. 
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GO  TO  110 

IF  (RNSAM  .ea.  S MS  Z ( LSMS Z  ♦  in  LSMSZ  =  LSMSZ  *■  1 
BIAS  =  81(1,  LSMSZ) 

vCHAT(J)  =RCH AT  ( J)  -  BIAS  ~  "  . .  . .  " 

ARCHAT (NCOUNT,  J)  =  RCHAT (J) 


GIVEN  THE 
tNTER  THE 
L >EV  IAT ION 
Z 


UNBIASED  ESTIMATOR  OF  THE  COMPONENT  RELIBIL ITT , 
2-DIMENSIONAL  ARRAY  SI G  AND  FINE  THE  STANDARD 
OF  ThE  UNBIASED  ESTIMATOR 

•  =RCHAT { J)  - 

PL3  *S3RHZ*«2MAL0G<Z»  )  ♦  * 2*  ( 1 . 1 0  9-.  514* 

ALOG  (-AlOG(Z))  .oC  3*  (  ALOG( -ALOt(Z)  )  )  *»2) /RNSA’ 
GO  120  I  =1,  NSMSZl 


=  1 

.LE. 


IF  (RNSAM  .LE.  SMSZ 
CONTINUE 
GO  TO  160 

IF  (RCHAT ( J)  .LT  .  .5) 
DO  140  I  =  1,  )>RLBS 
LRLBS  =1 

IF  (RCFAT(J)  .LE.  R 

- CONTINUE  '  — 

GO  TO  160 

CALL  II  CICU  (S1G,  ISO 
LSMSZ,  C,  WK  »  1ER ) 
CALL  ItCEVU  (RLBS,  NR 
RCHAT(J),  RNSAM,  SI 
-IF  (SIGMA  .GE.  RCRLB) 
SIGMA  =RCRLB 

"IER - -C - 

GO  TO  180 

-IF  (RNSAM  .EQ.-  S  MSZ  (L 
SIGMA  =S IG ( 1  ,  LS- 

~IF  (SIGMA  .GE.  RCRL8) 
SIGMA  =RCRLB 

-CONT  I  NUt - 


SMSZ (!♦!)) 


.  -.5)  "GO  TO  ire  - - 

hRLBSi 

LE.  RL3S(  I«-l)  )  GO  TO  150 


( S  IG  ,  '  ISO  »  RLBS,  NRLBS,  SMSZ,  NSMSZ, 
NK  »  IER) 

(RLBS,  NRL‘3S,  SMSZ,NSMSZ,  LRLBS,  LSMS 
RNSAM,  SIGMA,  IER) 

E.  RCRLB)  GO  TO  180  '  - 


.Ea.~  S  MSZ  (LSMSZ  ♦-!  )  )  LSFSZ«LSMSZ 
=  S IG  ( 1  ,  LSMSZ) 

.GE.  RCRLB)  GO  TO  180 - 

=RCRLB 


LRLBS, 
Z,  C, 


-FORM  A  VECT  CR  OF  NOEV  SAMPLE  RELIABILITIES  WITH  MEAN  RCHi 
AND  A  STANDARD  DEVIATION  OF  SIGMA 

- 1VDE  V=NMCT  - - - - 

CALL  GGNML  ( DSEE  L,  NDEV,  DEV) 

- DO~190_  Is  r,  NOEV - 

RC  ( I ,  J)  sRCHATCJ)  *■  DEV(I)  *  SIGMA 

- IF  (RC(  I,  J)  .  LT.  0 . 3  )  L  TRUND  =  LTRUNCM  - - 

IF  (  RC  (  I,  J  )  .LT.  0. 0  )  RC(I,U)=0.0 
TRUNCATE  THE  N C FMAL  DISTRIBUTION  IF  COM PONFNT  RELIA9ILI T' 
IS  GREATER  THAN  1 

- IF  (RC(I,  J)'  .LE.  1.)  GO-TO-193-  - 

RC  ( I ,  J )  =  1 . 

- ntrunc  =ntrunc  ♦  1  —  - - - 


190  CONTINUE 

-  -  -»«J3  CONTINUE  -  -  -  -  - - - 

C  H  OR  EACH  OF  THE  w  SYSTFmS,  THE  DIFFERENT  COMPONENTS  ARE  C0MTTn~0 
C  10  YIELD  NJ£  V  SAMPLES  Cc  THE  SYSTEM  RFL  I  Af  I  LI  T  Y  .  THESE  SABLES 
C  ARE  SEQUENCED  IN  ASCENDING  ORDER  AND  THEN  COUNTERS  KEEP  TRACK 
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c 

c 

c 

c 


OF  WHEN  THE  99,  95,  90,  80,  70,  60,  AND  5C  PERCENT  CONFIDENCE 
INTERVALS  CONTAIN  THE  TRUE  SYSTEM  RELIABILITY. -  - 

•SYSTEM  1  - - - - - 

NMC  =1 

- loin - *i-— - - 


CALL  REL 1  (NMC,  TRC,  TRS,  IOIM) 

-  ATRS(i)  =  TRS  < 1 )  - 

NMCsNMCT 

IOI M*I 01 MT  — . - 

CALL  RE L 1  (NMC,  RC,  RS,  I  DIM) 
CALL  VSRTA  (MS,  IOIM) 

IF  ( RS  (  Ml )  .LE.TPSll))  NS1C99=N  S1C99U 
IF  ( RS  (  M2)  .Lt.TRS(l)  ) 

IF  (RS(  M3)  .LE.TRS(D) 

IF  ( RS  (  M*» )  .LE.TPS(l)  ) 

IF  ( RS  (  M5)  •  L£  .TRS  ( 1 )  ) 

IF(RS^Mb)  .LE.TRS(l) ) 


NS1C95*NS1C95«-1 
NS1C90=NS1C90«-1 
NS1C80=NS1C80+1 
NS1C7  0  =  NS1CTQ4-1 
NS1C6Q=NS1C60*1 


c 

c 


IF  (  RS  (  M7 )  »Lc.  TRS(  1)  )  NSLC  5  0=  NS  1C 5  0  *•  1 


SYSTEM  2 

- NMC - “1  - 

IOIM  =1 


TRS,  IOIM) 


.  .  .  — - CALL  REL2  (NMC,  TRC, 

AT  RS ( 2 )  =TRS(1) 

- - NMCsNMCT  -  - 

IOI M=I OIMT 

- - -  -CALL  REL2  (NMC,  RC,  RS,  IOIM) 

CALL  VSRTA  (RS,  IOIM) 

- IF(RS(M1)  .LE.TRS(l)  )  NS2C99=NS2C99fl' 

IF(RS(M2)  .LE.TRS(l)  ) 

- IF(RS(M3)  .LE.TRS(l)) 

IF  (  RS  (  Hi.)  .  L  £ . T P. S  ( 1 )  ) 

- IF(PS(M5)  . LE.TRS(l) ) 

IF  (  RS  (  M6  )  .LE.TRS(l)  ) 


NS2C95=NS2C95*i 
N$2C93*NS2C90*1~ 
NS2C8J=NS2C80+l 
NS2C7  J  =  NS2C73U 
NS2C6  0  =N  S2CS0  «•  t 


-lFtRS<  M7)-.-tEiTRS<  1)  )~NS2C  50=  NS  2050  M‘ 


0 — SYSTEM  -3- 


NMC 

-IDIM- 


=  1 


CALL  REL  3  (NMC,  TRC,  TPS,  IOIM) 
~ATRS<3  ) - =r-TRS1t  ) - 


NMC=NMCT 

-IOI  M=I  OIMT - 

CALL  REL 3  (NMC,  RC,  RS,  IOIM) 

- CALL  VSRTA  (RS,  I  Cl  N)  - 

IF  (  RS  (  Ml )  .LE.TRS(D)  NS  3  C  9  9=  N  S  ?C9  9  l 


-IF1RS(M2)  .LE.TRS(l)) 
IF  (  RS  (  M3 )  .LE.TRS(l)  ) 
IF ( RS ( M4) .LE.TRS(l)) 
IF  (  RS(  M5)  .LE.TRS(l)  ) 
IF ( PS ( Mb ) .LE.TRS(l)) 


NS3C95=NS3C'35*t 
NS3C90=NS2C93*1 
NS3C80=NS3C80*t 
NS3C7:  =  NS3C70  *1 
NS3C60=NS2C60*t 


IF(P.S(  M7 ) • Lfc.TRS ( 1)  )  NS3C5C*  NS  3C  5  3  1 


C 

C 


SYSTEM  4 
NMC 
IOIM 


1 

1 
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n  n  n  o 


CALL  REL4  <NMC,  TRC,  TRS,  IDIM) 

- ftTRS(0  -  trs  (1  >  - 

NMC=NMCT 

•  - . '-IOlMrlOlMT  -  - 

CALL  RELA  <  NMC ,  RC,  RS ,  IDIM) 

- -CALL  VSRTA  (R3,  IOIM)  . . . 

IFCRS(M1>  .LE.TRS(i)  )  NS4C99rNS4C99*l 

- IF(RS(H2)  .LE.TRS(l)  )  NS4C95=NS4C95*1 

IF  ( RS  (  M3 )  .LE.TRS  (1)  )  NS4D9J=NS4C90«-1 
IF(PS(M4) . Lt.TRS ( 1 ) )  N3438:=NS4C*0 *1 

IF <RS(M5> .LE.TRS (1)1  N$4D 7 j=NS4C7 0 +1 
Ip  (  RS  (  M6 )  .  L E  . T RS  ( 1  )  )  NSt*D6Q  =  NS4C6  0*l 
IF  ( RS  (  M7)  .LE.TRS  (i)  )  NS*C  50=  NS4C  5  0  4  1 
Ttf  3  CONTINUE 


+  ♦  ->**w  ■»•»***» 


NPT=5*NPTS«  N  (LMC 

PRINT  350  »  LlKUNC  '  — . .  - . — ~ 

3 >  0  FORMAT  (1H  ,  11HTHERE  WERE  , 17, 18H  LOWER  TRUNCATIONS) 

- PRINT  469 «  N  1RUNC, NP T  - - - 

RNOLMC  =  NOlMC 

C  FOR  SYSTEM  1,  DETERMINE  THE  99,  95,  90,  80,  70,  6C,  ANO  50 

C  PERCENT  CONFIDENCE  LIMIT  COVERAGE  THE  TPUE  SYSTEM  REL I A  TIL  Ir  Y 
- PS1C99  =  NS1C99  /  RNOLMC  —  -  - 


PS1C95 

-PS1C90 

PS1C80 


NS1C95  /  RNOLMC 
NS1C93  /  RNOLMC 
NSLC80  /  RNOLMC 


- PS1C70 - ts'NSIC70'V  RNOLMC - 

PS1C60  =  NS1C60  /  RNOLMC 

- PS1C50 - NS 1C  5  0  /  RNOLMC - 

C  FOR  SYSTEM  2,  DETERMINE  THE  99,  95,  90,  3C,  70,  6C,  AND  50 

C — PERCENT  CONFIDENCE  LIMIT  COVERAGE  Or  THE  TRUE  SYSTEM  RELIABILITY 
PS2C99  =  NS2C99  /  RNOLMC 

- PSCC95 - S-NS2C95  '/-RNOLMC - 

PS2C90  =  NS2C90  /  RNOLMC 

- PSEC80 - sr  NS2C8  0  /  RNOLMC - 

PS2C70  =  NS2C70  /  RNOLMC 

- PS2C6C - s'  NS2C 6 0  /  RNOLMC - 

PS2C5Q  =  N52C50  /  RNOLMC 

T - FOR~SYST  EM  '3  i"  DETER  MI  NE  'THE"  99,  '"95  i'  -90,"~5CT  70  , '  6C  AND  50"' 

C  PERCENT  CONFIDENCE  LIMIT  COVERAGE  OF  THE  TP'JE  SYSTEM  RENTABILITY 

- PS3C99  -  =  r;S3C99  /  RNOLMC  . . .  . . 

PS3C95  =  NS3C95  /  RNOLMC 

... - PS3C90  _  3  NS3C90  /  rn3LmC  — •  - -  - 

PS3C80  =  NS3C30  /  RNOLMC 

- PS3C70  - *  NS3C70  /  RNOLMC’ - -  - 

PS3C60  =  NS3C60  /  RNOLMC 

• - PS3C50  '  -  s  NS3C5  0  /  RNOLMC  -  '  - - 


C  FOR  SYSTEM  4,  DETERMINE  THE  99,  95,  90,  *C ,  70,  60,  ANO  50 
C  PERCENT  CONFIDENCE  LIMIT  COVERAGE  OF  THE  T«UE  SYSTEM  RELIABILITY 
PS4C99  =  NS4C99  /  RNOLMC 


'PS4C95 

PS4C90 

PS4C8C 

PS4G70 


~  NS4C95 
=  NS4C9C- 
=  NS4C80 
=  NS4D  7  u 


/  RNOLMC 
/  RNOL  1C 
/  RNOLMC 
/  RNOLMC 


PS4C63  a  NS4C63  /  RNOLMC 

PS4C50  =  NShC50  /  RNOLMC  - -  -  - . 

PRINT  479 

PR  I  NT  44  9,  ATRS(l)  ,PS  1C99,  PS  1C  95  ,PS1C  9  D ,  PS1C8  0,  PS  1C  70  ,  PS  1  Ob  3,  »S1  C5  ? 
PRINT  499 

PRINT  46  9, ATRS (21  , PS2C99,  PS2C 95 , PS2C 9 0, PS2C8 0 , PS2C 70  ,  PS 20f 0,  PS2C5Q 
PRINT  509 

PRINT  489, ATRS < 3) ,PS3C99,  P 3 3C 95 ,PS 3C 9 0 , PS3C 3 0, PS3C70,  PS 306  9,  »S3C5D 
PRINT  519 

PRINT  *69, ATRS<4> ,  PSwC99,PS4C95,°S4C9  3,  P34C9  0,FS4C7a,  PS4C&D,  °S4C5  3 


C 

C 

C 

C 


-i  **•♦■*» 

•*4 

STOP  "FORAWHIlE1 


409  FORMAT  (  1H1  ) 

419  FORMAT  t  '  “  **** 

2  M  *",  T25,  "S  AMPLE 


•  •  •• 


•  «  Jp,  •• 

SIZE  =  ", 


it  |  •• 

13  t  *  T62 * 


••  p  •• 


3  T62,  . ,  /  ,  "  T22,  "MONTE  CARLO  "  "SIZE  = 

•  •  4  it 


«•*  M 

*  1 

,  /  .  •• 

,  T3, 


•“,f. 


T  62 


t  t 


T62 , 


••  4 


,  /  , 


) 


/  ,  bX,  "K  »  ",  F4.2,  /  , 

■C  *  ",  F2.0,  f  ,  6X , 


4  T62,  /  , 

5  44**  ■ 

- 6. - ,  /  /  ■/•-/-/  /  / 

♦  29  FORMAT  (  5  (IX,  "COMPONENT  ",  II, 

1  6X,  "ThETA  =  ",  F5.0,  /  ,  6X , 

2  "RELIABILITY  =",  F7.5,  /  /  >  ) 

-439  FORMAT  (  15(1X,  F7  .5)  > - - -  - - - 

*49  FORMAT  (/,"  MCa",I4,4X,"J  =",I2,4X, “NSTfiRT  =",I2 

- 1 . -  -  - .  . *,/,  KMATr"  E13.6,  5X  “THAT**"  El?. 6  /  l 

2  "  ITERA T 10NS="  13,  5X  "IER="  13  /  "  ♦♦♦♦•*t***~  )  2 

499  FORMAT  <  /  ”  +**-♦*♦#* »4*4^4**»*»  /  /  ••  DID  NOT  CONVERGE  IN"" 

1  "8  ATTEMPTS  WITH  OIr  F  ERE  NT  STARTING  <HATS"  /  “  THC  *E  P9  RF  GO"! 

- i ^ - "ING-ON  TO  THE  NEXT-  COMPONENT"  /  / 

3  ) 

— Tb  9-FORMA  T—<  -t—t— 

1  ,  18,  "  RELIABILITY  DEVIATES”,  /  /  ) 


HICH-TRUNCATIONS  -OUT-Oc“ - 

‘  (3  COMPONENTS  IN  ^RI 


479  FORMA  T  — < - /  —  “  ■***•*♦  SYSTEM  1  ♦  ♦♦♦♦■•/ 

1  "ESI"  ) 

- 48R — FORMAT  X  /,-**- TRUE  SYSTEM  RELIABILITY  -a",  F7.5,  / 

1  "  THE  99  PERCENT  CONFIDENCE  INTERVAL  COVERED  ",F5.4, 

- 2 - “-OF— T  M  6  “RUNS",/ , - 


1 

“4“ 


"  THE  95  PERCENT  CONFIDENCE  INTERVAL  COVERED  ",  Fb.4, 

“  OF  THE- RUNS", /,  "  THE  93  PERCENT  CCN'FIOENCt  INTERVAL  •• 

5  ,  F6.4,"  OF  THE  RUNS",/,"  THE  33  PERCENT  CONFIDENCE  IN' 

- -b - “  COVERS C  ",Fo.4,“  OF  THE  RUNS**,/,"  THE  70  PERCENT  CON'-'IDEN'E  “ 

7  "INTERVAL  COVERED  ",Fb.*,”  Op  THE  RUNS",/,"  THE  50  P^r-'NT  ” 

- 8 - ^CONFIDENCE  INTER  V6L-  COVERED  “,F6. 4,"  OF  THE  RUNS",/,"  THE", 

9  ”  50  PERCENT  CONFIDENCE  INTERVAL  COVFRED  ”,F6.4,"  OF  THE  RUNS”, 

-  t  ///>  -  -  - 

499  FORMAT  (  /  "  *•*»*  SYSTEM  2  •****"  / 

1  **S  WITH  2  “  “IN  FARALLED"  ) 

509  FORMAT  (  /  "  *****  SYSTEM  3  ♦♦**♦"  / 

1 - “ILELt  “  -  » - - - - 

519  FORMAT  (  /  "  *****  SYSTEM  4  •*♦*♦"  / 

1  "X  NETWORK)"  ) 

529  FORMAT  (  5 < 1 X ,  F1C.3*  5X>  ) 


Cl  COMPONENT  IM  SF=>IE' 
n  COMPONENTS  IN  PARA' 
(A  5-C0MP0NFNT  COUPLE' 


ENO  - 
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FUNCTION  CMPREL  (TIME,  K,  THETA,  C> 

REAL  K 

IF(THETA.EQ.TIME)  CMPREL=. 36737944 
IF (THETA  .EQ.TIME)  GO  T C  9 

IFdHETA  .IT.  10E9  .AND.  THETA  .GE.iOE-7)  GO  TO  6 
IF(THETA.GE.10E9>  CHPREL=1.0 

IFUHETA.GE.3.0  . AND. T  )£T  A.LT.10E-7)  CMPREL*0.0 
IF(THETA.LT  .0.0  PRINT  5 
5  FORMAT ( 1H  , 17HTHET A  IS  NEGATIVE) 

IF(THETA.LT.O.O)  CMPREL=0.0 

RETURN  ~ 

6  ARGUH=-(  (TIME-C) /THET  A  )  *•  K 
“  IFCARGUM.GT.-20.0  .AND.ARGUM.LT.  C.  0)  GOTO  8“ 
IF(ARGUM.GE.O.O)  CMPREL=1.0 
IF(ARGUM.LE.-20.  0)  CMPFEL  =  0.0 
RETURN 

8  '  CMPREL=EXP( ARGUN) 

9  RETURN 

END  . .  .  - . . . 


SUBROUTIKE  REL1  ( NMC ,  R,  RS,  IOIM) 

C  REL1  DETERMINES  THE  SYSTEM  RELIABILITY  OF  3  COMPONENTS  IN  SERIES 
DIMENSION  R  (IOIM, 5),  RS  (IDIM) 

DO  10  I  *1,  NMC 

10  RS( I )  sRCI,  1)  *  R( 1,2)  *  R ( I, 3) 

RETURN 

ENO 
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no  i  1  °  i  :  ,  '  « o 


SUBROUTINE  REL2  (NMC,  R,  RS,  IDIM) 

REL2  DETERMINES  THE  SYSTEM  RELIABILITY  OF  1  COMPONENT  IN 
SERIES  WITH  2  IN  PARALLEL 

OIMENSION  R  (IDIM, 5),  RS  (IOIN) 

00  10  I  =1,  NMC  ' 

10  RS(*>  =R<I»  1)  *  Cl.  -  Cl.  -RCI,  2)  )  *  Cl.  -RCI,  3)  ) ) 

RETURN 
ENO 


SUBROUTINE  REL3 
REL3  DETERMINES  THE 


C  NMC  ,  R,  RS.  ID IH) 
SYSTEM  RELIABILITY 


OF  3  COMPONENTS  IN  PARALLEL 


10 


OIMENSION 
00  10  I 
RSC I ) 

1  3)  ) 

RETURN 
ENO 


RS  C  IDIM) 


R  CI0IM.5) 

=  1.  NMC 

si.  -  Cl.  -RC 1.1 ) ) 


*  (1.  -RCI,  2))  *  Cl.  -RCI, 


SUBROUTINE  REL4  (NMC,  R,  RS,  IDIM) 

RFL 4  DETERMINES  THE  SYSTEM  RELIABILITY  CF  A  5  COMPONENT 
COMPLEX  NETWORK 

OIMENSION  R  (IDIM, 5),  RS  CIDIN) 

00  10  I  =1,  NMC 

RSC  I )  sRCI,  1)  *  Cl. -Cl. -RCI,  2))  •  C1.-RCI.5)  *  Cl. 

I  Cl.  -  RCI, 3))  *  Cl.  -  RCI, 4))))) 

10  CONTINUE 
RETURN 
ENO 
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oooooooooooooooonoooooooooo 


ROUTINE  PARES 


74/74  OPT  =  i 


FTN  4,#f518 


SUBROUTINE  PA  RES (N , M, C ,THETA, EK, MR, PTH, PEK, T) 

INPUT 

N=SAMPLE  SIZE  (BEFORE  CEN  SOR ING)  ,  N=1 00  OR  LESS  AS 
0 IMENSIONE  C 

SS1=0  IF  SCALE  PARAMETER  THETA  IS  KNOWN 
SS1=1  IF  SCALE  PARAMETER  THETA  IS  TO  BE  ESTIMATEO 
SS2=0  IF  SHAPE  PARAMETER  K  IS  KNOWN 

SS 2=1  IF  SHAPE  PARAMETER  K  IS  TO  BE  ESTIMATED 

SS 3=0  IF  LOCATION  PARAMETER  C  IS  KNOWN 

SS 3  =  1  IF  LOCATION  PARAMETER  C  IS  TO  EE  ESTIMATEO 

T(I)  =  I-TH  OROER  STATISTIC  OF  SAMPLE  (1=1, N) 

M=NUM3ER  OF  OBSERVATIONS  REHAINING  AFTER  CENSORING  N-M 
FROM  ABOVE 

C(1I=INITIAL  ESTIMATE  (OR  KNOWN  VALUE)  OF  C 
THETA ( 1)  =  INIT  IAL  ESTIMATE  (OR  KNOWN  VALUE)  OF  THETA 
EK(  1)  =  IN  ITI AL  ESTIMATE  (OR  KNOWN  VALUE)  OF  K 
HR=N'JMBER  OF  OBSERVATIONS  CENSORED  FROM  BELOW 
OUTPUT 

N,SS1,SS2,SS3,M,C<  1)  ,THETA(1),EK(1),MR 
— SAME  AS  FOR  INPUT 
C(J)=ESTIMATE  AFTER  J-l  ITERATIONS 
(OR  KNOWN  VALUE)  OF  C 
THETA ( J) =ES  T I  MATE  AFTER  J-l  ITERATIONS 
(OR  KNOWN  VALUE)  OF  THETA 
EK(J) ^ESTIMATE  AFTER  J-l  ITERATIONS 
(OR  KNOWN  VALUE)  OF  K 

(MAXIM LM  VALUE  OF  J  AS  PRESENTLY  DIMENSIONED  IS  500) 
EL=NATURAL  LOG.  OF  LIKELIHOOD  FOR  C( J) , THETA (J) , E K( J) 
DIMENSION  T (500) , C  (55 0  ) , THET A( 550 ) , EK( 550 1  ,X(56) , Y(55) 
SS1=1. 

SS2=i • 

SS3=0. 

- TF(N)  66,  66,  104  -  - - - -  ~ 

104  EN=N 

IF(M)  66,  €6,  110  '  '  . 

110  EM=M 

- 31  "  ELNM=0  •  .  .  . .  . 

EMRsMR 

- MRP=MR*1  - - - - - 

33  NM=N-M*1 

DO  34  I=NM,N  - 

EI=I 

- 34  ELNM=£LNM*ALOG(EI)  . 

IF  (MR)  €6,35,74 

. . 74  DO  75  1=1, MR  . . .  .  . 

EI  =  I 

75  ELNM=ELNM-ALOG(EI)  . 

35  00  30  J=  1,55 0 

• .  IF  (J-l)  66,25,37 

37  JJ*J-1 

’•  ’  ~  SK=0.  •-  . . . 

SL=0. 

.  DO  6  I  =M  RP,  M 

6  SK=SKMT(T)-C(JJ)  >**EK(JJ) 

IF  (SSI)  7,7,8 

7  THETA(  J)  =THETA(  JJ) 

-  GO  TO  9 
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8  '  IF  MR)  66,  19,20 

19  THETA  (  J)  =  <<  SKMEN-EM)*CT(M)-Ct  JJ)  )  **EK<  JJ) )  /EH) 
C*M1./EK(  JJ)  ) 

GO  TO  9 

20  X ( 1)  =  THE TA(  JJ) 

LS=0 

00  21  L= 1, 55 
LL=L-1 
LP=L*i 
X ( L°) =  X(L) 

ZRKM  <T(  79P) -C(JJ)  )/X(U)  **EK<  JJ) 

YCL)  =  -EK  (JJ)  MEM-E*R>  /X(L)  ♦  £«  JJ)  *SK/X(L)  *MEK  ( JJ)  >1  •) 
C*EK(  J  J ) *  ( EN-EM) *  <  T (M)-C(JJ) ) * *£K < JJ) /X (L> ** t EK( JJ) ♦! . 
C)-EMR*EK( JJ) *ZRK*EXP(- ZRK ) / ( X ( L) * Cl.-EXPC-ZRK) ) ) 

IF  <Y(U  )  53,  73,54 

53  LS=LS- 1 

IF  (LS+L)  58,55,58 

54  LS*LS*1 

IF  CLS-L)  58,56,58 

55  XCLP) =.5*X(L) 

GO  TO  61 

56  X(LP) =1.5*X CL) 

GO  TO  61 

58  IF  mi)*Y<LL)>  60,73,59 

59  LL=Ll- 1 
GO  n  58 

60  XCLP)  =  XCL)*YCL)  MX(L)-X(LL))/CYCLL)-YCL)) 

61  IF  C4BSC X(LP)-XCL)) -l.E-4)  73,73,21 

21  CONTINUE 

73  THET  A  (  J)  =X(  LPI 

9  EK(  J)  =  EKC  JJ)  '  ' 

10  IF  (SS2)  12,12,11 

11  00  17  la  FRP,  N  ' 

17  SL=SL*  ALCG( T (I)-C(JJ)) 

X(1)«EK(  J)  ■  ■  ■  '  : 

LS*0 

DO  51  L« 1,55  . 

SLK=0. 

DO  18  I*  7RP,M  "  '  . . . 

18  SLK=SLKMALOGCTCI)-C(  JJ))  -ALOG  C  THETA  ( J)  )  )  M  T  C  I)  -C  C  JJ)  ) 
C*»XCL) 

LL=L-1 

.  LP*L»1 

XCLP)  =  XCL) 

ZRK=C <T(PPP) -CCJJ) ) /THETA (J) )**X CL) 

YCL)=CEM-EMR)*(1./X (L ) -ALOG ( THET A { J) ) ) ♦  SL-SLK/THETA C J) 
C**XCL)  ♦  C  EN-EH)  *  (  A  LCG  (THET  A{J))-ALOG(TCM)-CCJJ)>)*  (TIM) 
C-CC JJ)  )  **X(L)  /THETAt  J)  **X  <L)  ♦EMR*ZRKM  ALOG  C ZRK) /X  CL) ) 
C*EXPC-ZRK)/C1.-EXP<-ZRK)) 

IF  CT  CL)  )  43,52,44 

43  LS*LS- 1 

IF  CLS*L)  47,  45,47 

44  LS=LS*  1 

IF  CLS-L)  47,46,47 

45  X(LP) =.5*X(L) 

GO  TO  50 

46  XCLP)  si.  5*XCL) 
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GO  TO  50 

47  IF  <YCL)*Y(LL))  49,52,48 

48  LL=LL- 1 
GO  TO  47 

49  X(LP)=X<L)»YCL)MX<L)-X<LL))/(Y(LL)-Y(U) 

50  IF  (ABSCX(LP)-X<L) )-l.E-4)  52,52,51 

51  CONTINUE 

52  EKC  J)  =X(  LP) 

12  C(J)=C( JJ) 

62  IF  CSS  3)  25,25,14 

14  IF  (l.-EK(JJ)  16,78,78 

78  IF  (SSH-SS2)  57,57,  16 

16  X<1)=C(J) 

LS=0 

"  00  23  L=  1, 55  . . .  ~  .  . . 

SK1=0. 

'  . SR*0.  '  . .  . "  * .  . 

DO  15  I  =  M  RP  »  M 

SK1=SK1MT(  I) -XCL)  )  **<EK(  J)-l.) 

15  SR=SR+i«/(T (I)-X(L)  ) 

LL=L-1  . . 

LP=L*1 

'  ■“  XC  LP)  =X(U  . * 

ZRK=(  CTCHRP)-X(L)  ) /THETAC J) ) **EK(  J) 

YCLI*C1.-EK(  J))*SR*EK(  J)  M  SKl  +  C  EN-EM)  MTCMI -X(  l) ) 
C**CEK( J) -1. )) /THETA (J) **E K< J) -EMR*EK< J) *ZRK*EXP C-ZRK) 

- C/f|TjHRP)-X(L»)*Cl.-EXPC-ZRKIII 

IF  (Y  (  L)  )  39,  24,40 

39  LS=LS-1  •  '  ' 

IF  (LS  *L  I  70,41,70 

40  '  L$*LS*i  "  . .  ’  *  ’ 

IF  CLS-L)  70, 42,70 

“41 - XCLP)  =  «  5  *X(  L )  “  - - - - 

GO  TO  22 

42  X(LP)  =  .5»X(L)  ♦  .5*T<1)  * - - 

GO  TO  22 

*  '7 OT  IF  (Y(U*Y(LD)  72,24,  71  '  - -  '  . . . 

71  LL=Ll-l 

- GO  TO  70  •  •  *  - - - - - - 

72  XCLP)  =XCL)^YCL)*(X(U-X(LL>)/CY(LL)-YCU) 

22  '  IF  (ABS(X(LP)-XCL))-l.E-4)  24,24,23  - 

23  CONTINUE 

~24  '  C(J)sXCLP)  . -  -  -  -  . ' 

GO  TO  25 

57 . C(J)=T<1)  -  - - 

25  IF  (MR)  66,38,69 

38  DO  63  1*1, N  . -  . 

IF  ICC  J)  ♦1.E-4-TC  I)  )  68,67,67 
67  MR=MR+1 

63  CI1)=T (1) 

'  68  IF  (MR)  66,69,31  ~  .  . 

69  SK=0. 

SL=0. 

00  36  I=MRP , M 
SK=SKMT(  I)  -C(J))  "EKC  J) 

36  SL=SL  ♦ALOGCTCI)-C(J)) 

ZRK*C  CTC  7RP)  -CCJ)  )/THETA(  J) )  *»EKI  J) 
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£L=ELNM»  <  EM-EMR)  *  <  ALOG  (EK  <  J)  ) -EK  (  J)  *  AL  OG  (  THETA  ( J>>  >  ♦ 
CCEKtJI  -l.)*SL-(SK*  (EN-EM)  *  ( T  ( M ) -C  (  J)  )  **EK  (  J)  )/  (THETA 
C(J)**EK(  J)>  4-EMR* ALOG  (1.- -EXP <-ZRK)> 

150  IF ( J-3 )  30,  27,27 

27  IF  (A3S(C<J> -C(JJ) ) -l.E-4)  28,28,30 

28  IF  (ABS<THETA(J)-THETA<JJ))-l.E-4>  29,29,30 
29  IF ( A3S  (EK(J)  -EK(JJ)  > -l.E-4)  126,  126,3  0 

30  CONTINUE 
126  PTH=THETA(J) 

PEK=EK(  J) 

GO  TO  140 
66  PRINT  135 

135  FORMAT (1H  , 20HALL  SAMPLES  CENSORED,/) 

PEK=0. 

PTH=0. . 

140  CONTINUE 
RETURN 
END 


PROGRAM  WEIB  (INPUT, OUTPUT) 

C 

<s 

C  *  * 

C  *  FOR  EACH  COMPONENT  CF  A  COMPLEX  SYSTEM,  THIS  PROGRAM  * 

C  *  GENERATES  A  SAMPLE  OF  SIZE  NS AM  FROM  THE  WEIBULL  DISTRIBUTION  * 

C  *  USIN.,  THE  TRUE  PARAMETERS  TK  (SHAPE),  T  THE  T  A  (SCALE),  AND  TC  * 

C  *  (LOCATION).  EROM  THIS  SAMPLE,  THE  MAXIMUM  LIKELIHOOD  * 

C  *  ESTIMATORS  ( ML ES)  FOR  K  AND  THETA  ARE  DERIVED  USING  HARTER  *  * 

C  *  MOORES  ITERATIVE  SCHEME  AND  THE  SIMULTANEOUS  EQUATION  SOLVER  * 

C  *  ZSYSTM.  THE  *LES  ARE  COMBINED  TO  YIELD  RCHAT,  THE  HLE  FOR  THE  * 

C  *  COMPONENT  RELIABILITY.  GIVEN  THE  RELIABILITY  ANO  THE  SAMPLE  * 

C  *  SIZE  NS  AM  ,  RCHAT  IS  AS Y M^T 0 T IC A L L Y  NORMALLY  DISTRIBUTED  WITH  A  * 

C  *  SPECIFIED  VARIANCE.  THEREFORE  WE  CAN  SAMPLE  FROM  THE  NORMAL  * 

C  *  DISTRIBUTION  TO  OBTAIN  4  VECTOR  OF  SAK»IE  COMPONENT  * 

C  ^RELIABILITIES.  THIS  PROCESS  IS  REPEATED  FOR  EACH  COMPONENT  * 

C  *  ANO  THEN  THE  RELIABILITIES  ARE  COMBINED  FOR  4  DIFFERENT  TYPES  * 

C  *  OF  SYSTEMS  TO  YIELD  4  VECTORS  0>-*  SAMPLE  SYSTEM  RELIABILITIES.  * 

C  *  THESE  VECTORS  ARE  ORCERED  AND  THEN  THE  OS,  90,  AND  00  PERCENT  * 

C  *  LOWER  CONFIDENCE  LIMITS  ARE  PICKED.  THIS  ESTABLISHES  THE  05,  * 

C  *  90,  AND  00  PERCENT  CONFIDENCE  INTERVALS  FOR  EACH  SYSTEM  AND  TT  * 

C  *  IS  NOTED  WHETHER  EACH  OF  THESE  INTERVALS  CONTAINS  THE  TRUE  * 

C  *  SYSTEM  RELIABILITY.  * 

C  *  THE  ABOVE  PROCESS  IS  REPEATED  FOR  NOLMC  MONTE  CARLO  RUNS,  WITH  * 

C  *  COUNTERS  FOR  EACH  SYSTEM  TO  TRACK  THE  NUMBER  OF  TIKES  THAT  THE  * 

C  *  CONFIDENCE  INTERVALS  CONTAIN  THE  TRUE  SYSTEM  RELIABILITY.  * 

C  *  * 

C 

DIMENSION  CC(  550  ),THETA(550),EK(55C) 

DIMENSION  ARCMAT  (  ZQOO  ,5)  ,  ATRS(4),  OKIE, 15),  C(4,4),  DEV 

1  (  10  0  0),  PARA  M  (3 ,5)  ,  c  ( 5  0  0  ,  5)  ,  RC(1Q00,5>,  RCHAT 

2  (5),  FLBS (12), RS(IOCO) ,  SIG(12,l5),  SIGSO 

3  (12,15),  5 MS Z( 1 5)  ,  TEMP (  20  0) ,  TRC(5),  TRS  ( 1)  *  VRH(  10»  11)  , 

4  WK(  2  0  0  ) ,  WKAREA(IC),  X(2) 

D0U3LE  PRECIS  IONCSEE  0 

REAL  KHAT 

DATA  RLBS  /  .5,  .55,  .  6,  .65,  .7,  .  75,  .  8,  .85,  .9,  .925,  .95, 

1  .98  / 

C 

DATA  SMS Z  /  8.,  9.,  10  .,  11.,  12.,  13.,  14.,  15.,  20.,  25., 

1  30.,  40.,  50.,  75.,  100  .  / 

C 

0  INITIALIZE  VARIABLES 

PI  =  4 .  *  A  T  A  N  <  1 . ) 

READ*,  DSEEO, T 
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o  o 


r 


CALL 

T  1 1; 


RAWS  FT 


NSME7  ' 

NSMSZi  = 

NR LOS  1  = 

isn  = 

NT RUNG  = 

LT  R'JNC=  0 
NS1C99  = 

NS1C95  = 

NS1C90  = 

NS1C80  = 

NS  1C  7  0  s 

NS1C50  = 

NS1C5  0 
NS2C99  = 

NS2C95  = 

NS2C90  = 

NS2C80  = 

NS2C70  = 

NS2C60 
NS2C50  = 

NS3C99  = 

NS3C95  = 

NS3C90  = 

NS3C80  = 

NS3C70 
NS3CB0  = 

NS3C50  = 

NS4C9  9  =  0 
NS4C95  = 

NS4C90  = 

NS4C80  s 

NS4C70  = 

NS4C6  0 
NS4C50  = 

PRINT  409 


(  T) 
130. 
12 
IS 

NS  MS  2 
NRLBS 
1? 

0 


PRINT  409 

READ  THE  SAMPLE  SIZE  AND  LUMBER  OF 
READ*, NMCT, IDIMT, NPTS 
READ*, Ml  ,M2, H3,M4, M5,M6,M7 
READ  *,  NSAM,  NOLtIC 
PRINT  419,  NSAM,  NOLMC 
RNSAM  =NSAM 

M=NSAM 
MR  =  0 


MONTE  CARLO  RUNS 


MR  =  0 

C  READ  THE  TRUE  COMPONENT  PARAMETERS 

. READ  *,  ((PA  RAM  (I,  J)  ,  1=1,  3), 

PRINT  4  29,  ((J,  (PAR AM (  I ,  J>  , 

1  PAR AM (2,  J) ,  PA9A«(3,  J))),  J 
READ*,  ((SIG(I,J)  ,  J=l,  IE),  1=1,1 
REAO*  ,  ( (BI(I, J), J  =  1,15),I=1, 12) 
PRINT  439,  (  (SIG ( I ,  J),  J  =  l,  1 

PRINT 


J=l, 

1=1, 


CMPREL  ( T  IME ,  P  AR  A  M  ( 1 ,  J) 


439, 

439, 


( (SIG (I, 
((OKI, 


IS)  , 
IS)  , 


r=i , 12) 
1=1 ,12) 


»  +  **«*«  *  0 


U  UCl  u  oooooooo  oo  13  o  o  o  o  o  o  u  o  o  o 


Th  I  -  'Vjl  S  I  )E  LOOP  FROM  HERE  TO  S  T  A  T  E  M  FM  T  300  COMPLETES 
NC ‘HITE  CARLO  RUNS  OF  THE  SIMULATION. 


******** V 


00  3  00  NCOUHT  =  1,  NOLMC 


********* 


FOR  EACH  OF  5  COMPONENTS,  THIS  LOOP  GENERATES  THE  ML E  OF  RCHAT 
FROM  TH*  MLES  OF  K  AUC  THETA.  IT  DETERMINES  THE  VARIANCE  OF 
RCHAT  A  NO  THEN  SAMPLES  FROM  THE  NORMAL  DISTRIBUTION  FOR  NQEV 
SAMPLE  RELIABILITIES  OF  EACH  COMPONENT. 

DO  290  J  =t,  5 

TK  =  PARA  M  (1,  J) 

TTHETA  =  PARAM ( 2,  J) 

TC  =  PARAM  (3,  J) 

PASS  INFORMATION  CN  COMPONENT  NUMBER  AND 
SAMPLE  SIZE  THRU  ARRAY  R 
R(  2  0  5 »  1)  =  J 
R(  2  0  4,  J)  =  NS  A  M 

DETERMINE  THE  TRUE  COMPONENT  RELIABILITY 

TRC(J)  =CMPREL( TIME,  TK,  TTHETA,  TC) 

GATHER  NS  AM  FAILURE  TIMES  FROM  THE 
WEIBULL  DISTRIBUTION  MTH  TRUE  PARAMETERS 
TK, TTHETA,  AND  TC 

CALL  GGWIB  (CSEEO,  TK,  NSAM,  TEMP) 

DC  20  I  =1,  NSAM 
R  ( I ,  J)  =TTHETA  *  T  EMP  <  I  >  t  TC 
20  CONTINUE 

DETERMINE  THE  LIKELIHOOD  CF  ORAWING  THIS  SAMPLE 
USING  THE  TRUE  K,  THETA,  AND  C 

determine  TEE  mle  OF  THETA  AND  K 
BY  HARTER  l  MOORES  ITERATIVE  SCHEME 

CC(1)  =  TC 
THETA  (  1)  =TTH£TA 
EK  ( 1)  =  TK 

CALL  P  ARES(  NS  AM ,  M  ,  CC ,  Tt-ET  A,  E  K,  MR  ,  THA  T,  KH  AT ,  R  ( 1 ,  J)  ) 

C  DETERMINE  RCHAT,  THE  MLE  CF  THE  COMPONENT  RELIABILITY,  USING 
C  THE  TRUE  C  AND  THE  MLES  CF  K  AND  THETA 

RCHAT  (J)  =  CMPREUTIME,  KHAT,  THAT,  TC) 

C 

C  GIVEN  THE  MLE  OF  THE  COMPONENT  RELIABILITY  AND  THE  SAMPLE  SIZE, 
C  ENTER  THE  2 -01  ME  NS  ION AL  AFRAY  31  AND  FIND  THE  BIAS  OF  THE 
C  ESTIMATOR 


00  50  I 

=1,  NSMSZ1 

LSMSZ 

=  1 

I F  (RNSAM 

.LE.  SMS  7(1*1)  ) 

GO  TO 

50 

CONT  INUE 

GO  TO  90 

60 

IF  (RCHAT(J) 

.LT.  .5)  GO  TO 

100 
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00  70  I  =1,  N=>LSri 
LRL9S  =1 

IF  (RCMAT(J)  .IE.  «?LBSCI*in  GO  TO  80 
7  C  CONTINUE 

GO  TO  <50 

80  CALL  IECICU  (01,  ISO,  R LBS ,  NRLBS,  SMSZ,  NSHSZ,  LRLBS,  LSMSZ 
1  C,  tO,  IER) 

CALL  IBCEVU  (RLBS,  NRLBS,  SMSZ,  NSMSZ,  LRLBS,  LSMSZ,  C, 

1  RCH  A  T  ( J )  ,  RNSAM,  BIAS,  IER) 

IF  (LRLBS  .LT.  NRLBS)  GO  TO  110 
90  BIAS  =0. 

SO  TO  113 

00  IF  ( RN SAM  .EC.  SMSZ(  LSMSZ  «•  1)  )  LSMSZ  =  LSMSZ  ♦  1 
BIAS  =  Bid,  L  SMS  2) 

10  RCHAT(J)  =RCH  AT ( J)  -  BIAS 

ARCH AT( NCOUNT ,  J)  -  RCHAT(J) 

GIVEN  THE  UNBIASED  ESTIMATOR  OF  THE  COMPONENT  RELIBILITY, 

ENTER  THE  2-OIMENSIQHAL  A  ERA  Y  S IG  AND  FINC  THE  STANDARD 
DEVIATION  OF  THE  UNBIASED  ESTIMATOR 
Z  =RCHAT { J) 

RCRLE  =SQRT(Z**2*  (  AL OG  (  Z  >  )  **  2 *  ( 1 .  109-.  SI 4* 

1  ALOG< -ALOGt Z) )  ♦  . 6  0 8* ( ALO G ( -A  LOG ( Z ) ) ) ** 2> / RNSAM) 

DO  120  I  =1,  NSMSZ 1 
LSMSZ  =1 

IF  (RNSAM  .LE.  Sf'SZ(Id))  GO  TO  130 
20  CONTINUE 

SO  TO  160 

30  IF  (RCHAT(J)  .LT.  .5)  GO  TO  170 

DO  140  I  =1,  NRLBS 1 
LRLBS  =1 

IF  (RCHAT(J)  .LE.  RLBS  < I  *  1 ) )  GO  TO  150 
40  CONTINUE 

SO  TO  160 

50  CALL  IBCICU  (SIG,  ISO,  RLBS,  NRLBS,  SMSZ,  NSMSZ,  LRLBS, 

1  LSMSZ,  C,  WK,  IER) 

CALL  TECEVU  (RLBS,  NRLBS,  SMSZ, NSMSZ,  LRLBS,  LSMSZ,  C, 

1  RCH AT ( J) ,  RNSAM,  SIGMA,  IER) 

IF  (SIGMA  .3  E .  RCRtB)  GO  TO  180 
50  SIGMA  =RC  RLB 

IER  =0 

SO  TO  180 

r 0  IF  (RNSAM  .EQ.  SMS7CLSMSZ  f  1))  l.SMSZ  =  LSMSZ  ♦  1 

SIGMA  =  S  IG  ( 1 ,  LSMSZ) 

IF  (SIGMA  .GE.  RCRIB)  GO  TO  180 

SIGMA  =RC  R  LB 

)0  CON T INUE  _ __  _ _ 

FORM  A  VECTOR  OF  NDEV  S A  (PL  E  RELIABILITIES  WITH  MEAN  RCH  AT 
ANO  A  BETA  (ALPHA, BETA)  DISTRIBUTION 
NOEV=NHCT 

Q  =  RCHAT(  J) /(  l.-PCHAT  ( J)  ) 

8  E  T  A  =  Q/(((l. fQ) **3) *SIGMA**2)  -i./(l.*Q> 

A  LP  H  A=  Q*3ETA  ! 

CALL  GG3TP( DS EEC, ALPHA, BETA ,NCEV, DEV) 

DO  190  1=1, NDEV 

RC  (I,  J)  =OE  V  (I)  ; 
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OOOOOCJOOO 


c 


IF  <  ?;  (  T  ,  J)  .LT.  C.  0)  L 1  RUNG  =  LT  R'.J  NC  ♦  1 
IF  (9C(  I,  J).LT.  C.  0)  9C(I,J>=0.0 

T P!J*:n AT r  The  BETA  DISTRIBUTION  IF  COMPONENT  RELIABILITY 
IS  GREATER  THAN  1 

IF  (RC(I,J)  .LE.  i.)  GO  TO  190 
RC(I,J>  =1. 

NTRUNC  =NT9UNC  ♦  1 


190  CONTINUE 
290  CONTINUE 


FGR  EACH  OF  THE  A  SYSTEMS,  THE  DIFFERENT  COMPONEN  IS  ARE  COMBINED 
TO  YIELD  NO £7  SAMPLES  OF  THE  SYSTEM  RELIABILITY.  THESE  SAMPLES 
ARE  SEQUENCED  IN  ASCENCING  ORDER  ANO  THEN  COUNTERS  KEEP  TRACK 
OF  WHEN  THE  99,  95,  90,  80,  70,  60,  AMO  50  PERCENT  CONFIDENCE 
INTERVALS  CCNTAIN  THE  TRUE  SYSTEM  RELIABILITY. 

SYSTEM  1 

NMC  =1 

IOIM  =1 

CALL  RE L 1  (NMC,  TRC,  TRS,  IOIM) 

ATRS<1)  =TRS  (  1) 

NMC=NMCT 
ID IM= I D  T  MT 

CALL  REL 1  (NMC,  RC  ,  RS,  IOIM) 

CALL  VSRTA  (RS,  IOIM) 

IF  (RS( Ml  )  .LE.TRS ( 1)  )  N SIC 99= NS  1C 99+1 
IF ( RS ( M2 )  .LE.TRS(l) )  N SIC 95  =  KS 1 C 95 +1 
IF(RS(M3)  ,LE.TRS( 1) )  N SIC  90  =  NS  1C 90 +1 
IF(RS(M4)  .L  E .  TRS  (  1)  )  N SIC 60  =  NS 1C  8 0 U 
IF  (RS(  M5  )  .LE.TRS  (  1)  )  NS1C70~NS1C70+1 
IF(RS(M6)  .LE.TRS(l)  )  N SIC 6 0= NS  1C 60 +1 
IF ( RS (  M7).LE.TRS(1) )  NS1 C50=NS 1C  50* 1 
C 

C  SYSTEM  2 

NMC  =1 

IOIM  =1 

CALL  REL 2  (NMC,  TRC,  TRS,  IOIM) 

A  T  RS  (2)  =TRS  (  1 ) 

NMC=NMCT 
IO IM= I O I MT 

CALL  PEL2  (NMC,  RC ,  RS,  IOIM) 

CALL  VSRTA  (RS,  TDIM) 

IF (RS ( Ml  )  .LE. TRS ( 1> )  NS2C99-NS2C99»i 
IF(RS(M2)  .LE.TRS(l) )  NS2C 95  =  nS 2C95 +  1 
IF(RS(  M3  I  .t,F.  TRS  (  1)  )  N  SEC  9  S  =  NS  2C  90  f  1 
IF (RS ( M  A  )  ,LE.TDS( 1)  >  NS2C 6C  =  NS 2C 8 0  +  1 
IF ( RS ( M5 >  .LE. TRS( 1) )  N S2C 7 0= NS2C 7 0 +1 
•  •  -  -  IF  (RS  (  M6)  .LE.1RS(  1)  )  N  S2C  6C=N$2C60  H 
IF (RS (  M  7) • L E . TRS ( 1 ) )  NS2C50  =  NS?C50+i 
C 

C  SYSTEM  3 

NMC  =  1 

ID  I  M  =1 

CALL  REL  3  (NMC,  TRC,  TRS,  IOIM) 

A T R S  (  2)  =  TRS  (  1) 

NMC=NMCT 
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idim=ioimt 

CALL  REL3  (NMC,  RC,  RS  ,  IOIM) 

CALL  VSR T A  (RS,  IDIM) 
IFlRStMD.LE.TRS  (1)  )  NS3C99=NS3C99*1 
IF  (RS(  M  ?  ).LE.T=>S(  1)  J  NS3C95=NS3C95*1 
IFtRS  (  M3)  .LE.TRSt  1)  )  N  S3C  9  0  =NS  3C  90  <-1 
IFtRSt  M4)  .LE.TRSt 1) )  NS3C  B0  =  MS  3080*1 
IF(R3( M5)  .LE.TPSt 1) )  N  S3C  70  =  NS 3C 7 0*1 
IF  (RS  (  M6  )  .LE.  TPS  (  1)  )  N  f3C60  =  NS3C60  *1 
IFtRSt  M7) .LE.TRS ( 1) )  TS3 CEO =NS 3 C5 0 ♦ 1 

SYSTEM  4 

NMC  =  1 

I9IM  =  1 

CALL  REL4  (NMC »  TRC,  TRS,  IOIM) 

AT  R  S ( 4 )  =  TRS ( 1 ) 

NMC=NMCT 
ID  IM=  I  9 1 MT 

CALL  REL4  (NMC,  RC,  RS ,  IDIM) 

CALL  VSRTA  (RS,  IDID 
IFtRS ( Ml) ,LE. TRS ( 1> )  N  14C  99  =  NS  4099*1 
IF  (RS(  M2)  .LE.TRSt  1)  )  N  f4C  95  =  NS  4C  9  9  +1 
IF(RS( M3)  .LE.TRSt 1) )  NS4C90=NS4C99 *1 
IF(RS(M4)  .LE.TRSt 1) >  NS4C 80  =  NS4C A 0*1 
IFtRSt  M  5)  .LE.TRS<  1  ))  N  S4C  7  0=  NS  4C  7  0  *1 
IF(RS(M6)  .LE.TRS  (1)  )  N E4C 60= NS 4C 6 0 *1 
IFtRSt  M7)  .LE.TRS  ( 1)  )  ^4  C5Q  =NS4  C50  *  1 

300  CONTINUE 


********  *  * 
********  *  * 


NPT=5*NPTS*NOLMC 
PRINT  350,  LTRUNC 

350  FORMAT (lh  ,  1 1HTHERE  MERE  ,I7,18H  LOWER  TRUNCATIONS) 

PRINT  459,  NT  RUNG  ,  NPT 
RNOLMC  =  NCLMC 

C  FOR  SYSTEM  1,  DETERMINE  THE  99,  95,  90,  80,  70,  60,  AND  50 
C  PERCENT  CONFIDENCE  LIMIT  COVERAGE  OF  THE  TRUE  SYSTEM  RELIABILITY 
PS1C99  =  NS1C99  /  RNOLMC 

PS1095  =  NS1C95  /  RNOLMC 

PS1C90  =  NS1C9C  /  RNOLMC 

PS1C80  -  NS1C80  /  RNOLMC  . 

PS1CF0  =  NS1C70  /  RNOLMC 

PS1C60  =  NS1C60  /  RNOLMC 

PS1C5  0  =  NS1C5C  /  RNOLMC 

C  FOR  SYSTEM  2,  DETERMINE  THE  99,  95,  90,  80,  70,  60,  AND  50 
C  PERCENT  CONFIDENCE  LIMIT  COVERAGE  OF  THE  TRUE  SYSTEM  RELIABILITY 


PS2C99 

= 

NS 2  M  99 

/ 

RNOLMC 

PS2C95 

= 

NS2C95 

/ 

RNOLMC 

PS2C90 

s 

NS2C9C 

/ 

RNOLMC 

PS2C80 

r 

NS2C80 

/ 

RNOLMC 

PS2C70 

s 

NS2C70 

/ 

RNOLMC 

PS2C60 

r 

NS2C60 

/ 

RNOLMC 

PS2C5  0 

r 

NS2C59 

/ 

R"JOL"C 

C  FOR  SYSTEM  3,  DETERMINE  THE  9r’,  95,  90,  80,  70,  60,  AND  50 

C  PERCENT  CONFIDENCE  LIMIT  COVEPAGE  OF  THE  TRUE  SYSTEM  RELIABILITY 
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PS3';  !9  = 

NS3C99 

/ 

RNOLMC 

ps5;.  .5  = 

NS3C95 

/ 

R\'OLMC 

PS^COO  = 

NS1C93 

/ 

RNOLMC 

p*o:u 

NS3C80 

/ 

RNOLMC 

p  S  3 ;  7  c  = 

NS3C70 

/ 

RNOLMC 

PS  TO  6  0  = 

NS3C60 

/ 

FNCLMC 

PS3C50 

NS3C50 

/ 

RNOLMC 

SYSTEM  4,  DETERMINE 

THE  99,  95 

PS3C50  =  NS3C50  /  RNOLMC 

C  FOR  SYSTEM  ^ ,  DETERMINE  THE  99,  95,  90,  90,  70,  60,  AND  50 
C  PERCENT  CONFIDENCE  LIMIT  COVERAGE  OF  THE  TRUE  SYSTEM  RELIABILITY 
PS4C99  =  NS4C99  /  RNOLMC 


PS4C99 
PS4C95 
PS4C90 
PS43  8 0 
PS4C70 
PS4C6  0 
PS4C50 


NS4C95 
NS4C90 
NS4C80 
NS4C7  0 
NS4C60 
NS4C50 


RNOLMC 

RNOLMC 

RNOLMC 

RNOLMC 

RNOLMC 

RNOLMC 


PS4C5U  =  N540  J  0  /  RNULMC 

PRINT  479 

PRINT  49 9, AT  RS<1)  , PS  1C <9, PS1C95, PS  1C  9G  ,  »S  1C8  0 ,  PS1C  70  ,  PSiC  60  ,  PS1C  5  0 
PRINT  499 

PRINT  4S9,ATR5<2 ) ,PS2C99, PS2C95, PS2C9D , PS 2C8 0 , PS2C 7C , PS2C 6 D , PS2C 5 0 
PRINT  509 

PRINT  489,ATfiS(3) ,PS3C99, PS3C95, PS3C90 , PS 3C 8 0 , PS3C70 , PS 3C 60, PS3C 5 0 
PRINT  519 

PPINT  4 8 5, AIRS (4) ,  PS4CE9, PS4C9  5, PS4C 90 , PS4C 90 , PS4C70 ,  PS4 C 60 , PS4C 50 

*******************  ***************  ********* ******************  ******* 

STOP  "FCRAWHILE" 


409  FORMAT  (  1H1  ) 

419  FORMAT  (  ”  *********** 

1  «**♦*******••,  /  ,  •• 

2  ,  "  T  25 ,  "SAMFLE 

3  T62,  /  ,  ** 

4  T62,  ••*",  /  ,  "  *", 

5  ••  ******************** 

6  "*",////// 


",  T62,  T62,  /  0 

"  "SIZE  =  ",  13,  T62,  /  ,  "  *",004 

T22,  "MONTE  CARLO  "  "SIZE  =  ",  13,  00  4 

T62,  /  ,  "  *",  T62,  ”*",  /  ,  00  44 

***************************************** 


429  FORMAT  (  5<1X, 


■COMPONENT 


6X ,  "THETA  =  ”,  F5.0,  / 

"RELIABILITY  ="  ,  F7  .5,  / 

FORMAT  (  1  5  ( IX ,  F7.5  )  ) 
FORMAT  </,"  **********••,/, 


) 

II, 
.  6X , 

/  )  ) 


/  ,  6X,  "K  =  ",  F4.2, 
•C  =  ”,  F2.0,  /  ,  6X, 


449  FORMAT  </,"  **********••,/,••  MC  =  "  ,  I  4,  4X  ,  "  J  =  ",I2»4X,**NST  ART  --••,12 

1  ,/,  ”  KH AT  =  "  E13.6,  5X  ” T H A T - “  E13.6  /004 

2  “  I  T£  R  AT  I  ONS  =  "  13,  5X  "IER=“  13  /  ~  ***,,*****..  >  OQi*- 

459  FORMAT  (  /  "  *** *************** *••  /  /  ••  DIO  NOT  CONVERGE  IN"0 

1  "8  ATTEMPTS  WITH  CIF  FEREMT  STARTING  KHATS”  /  "  THEREFORE  GO"O04, 

2  "ING  ON  TO  THE  NEXT  COMPONENT"  /  /  "  **********************  o 

3  > 

469  FORMAT  (  /  /  ,  "  THERE  WERE",  17,  "  HIGH  TRUNCATIONS  OUT  OF" 

1  ,  T 8 ,  "  RELIABILITY  CEVIATES",  /  /  ) 

4 ?9  FORMAT  (  /  "  *****  SYSTEM  1  ***•*"  /  "  (3  COMPONENTS  IN  SERI"00 

1  "ES>"  > 

489  FORMAT  (  /  ,  "  TRUE  SYSTEM  REL IAS  TL ITY  =",  F7.5,  / 

1  "  THE  99  PERCENT  COtFIDENCC  INTERVAL  COVERED  ",F6.4, 

2  "OF  THE  RUNS",/, 

3  "  THE  95  PERCENT  CONFIDENCE  INTERVAL  COVCREO  ",  F6.4, 


(3  COMPONENTS  IN  SERI"00 


171 


4  "  OF  THE  RUNS",/,"  THE  90  PERCENT  CONFIDENCE  INTERVAL  COVERED  " 

5  ,  F6  « 4  f  *'  OF  THE  RUNS",/,"  THE  30  PERCENT  CONFIDENCE  INTERVAL" 

6  "  COVERED  “,F6.  4,"  CF  THE  RUNS",/,"  THE  70  PERCENT  CONFIDENCE  " 

7  "INTERVAL  COVERED  ",F6.4,"  OF  THE  RUNS",/,"  THE  60  PERCENT  ” 

8  "CONFIDENCE  INTERVAL  COVERED  ",F6.4,"  OF  THE  RUNS",/,"  THE", 

9  "  50  PERCENT  CONFIDENCE  INTERVAL  COVERED  ",F6.4,"  OF  THE  RUNS", 

1  ///) 

499  FORMAT  <  /  "  *****  SYSTEM  2  •****"  /  "  (1  COMPONENT  IN  SERIE"0 

1  "S  WITH  2  “  "IN  PAfALLEU”  > 

509  FORMAT  {  /  "  *****  SYSTEM  3  **•**”  /  "  (3  COMPONENTS  IN  PARA”00434C 

1  "LLED"  I 

519  FORMAT  (  /  "  *****  SYSTEM  4  *♦***"  /  “  (A  5-COMPONENT  COMPLE"00 

1  "X  NETWORK)"  ) 

529  FORMAT  I  5  (  IX,  F  10.8,  5  X)  )  00  43 

C 

ENO 
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This  appendix  contains  tb*  computer  program  listing 
for  the  adjusted  univariate-normal  technique,  i.e.,  the 
univariate-normal  technique  with  Gatliffe's  method  of 
adjusting  for  perfect  system  reliability  estimates  incor¬ 
porated. 

It  should  be  noted  that  due  to  large  execution  times 
for  this  program,  100  Monte  Carlo  simulations  were  performed 
in  each  of  six  computer  runs  for  each  component  sample  size. 
The  results  were  then  totaled  and  averaged  over  the  six  runs 
for  each  component  sample  size.  The  execution  times  for 
100  Monte  Carlo  simulations  are: 


Component  Sample 
_ Size _ 

10 

15 

20 

50 

100 


Execution  Time 
(Seconds ) 

247 

259 

270 

332 

433 


The  adjusted  univariate-normal  technique  fits  inside 
140,000  words  of  core  on  the  CDC  6600  machine  as  does  the 
other  univariate-normal  technique. 
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PROGRAM  HEIB( INPUT, OUTPUT) 

C 

c  * 

C  *  FOR  EACH  COMPONENT  OF  A  COMPLEX  SYSTEM,  THIS  PROGRAM 
C  *  GENERATES  A  SAMPLE  OF  SIZE  NS AM  FROM  THE  WEI8ULL  DISTRIBUTION 
C  *  USING  THE  TRUE  PARAMETERS  TK  (SHAPE),  TTHETA  (SCALE),  AND  TC 
C  •  (LOCATION).  FROM  THIS  SAMPLE,  THE  MAXIMUM  LIKELIHOOD 
C  *  ESTIMATORS  ( MLES)  FOR  K  AND  THETA  ARE  DERIVED  USING  HARTER  l 
C  *  MOORES  ITERATIVE  SCHEME  ANO  THE  SIMULTANEOUS  EQUATION  SOLVER 
C  *  ZSYSTN.  THE  MLES  ARE  COMBINED  TO  YIELD  RCHAT,  THE  MLE  FOR  THE 
C  *  COMPONENT  RE  LIABILITY.  GIVEN  THE  RELIABILITY  ANO  THE  SAMPLE 
C  *  SIZE  NS  AM ,  RCHAT  IS  ASYMPTOTICALLY  NORMALLY  DISTRIBUTED  WITH  A 
C  *  SPECIcIEO  VARIANCE.  THEREFORE  HE  CAN  SAMPLE  FROM  THE  NORMAL 
C  *  DISTRIBUTION  TO  OBTAIN  A  VECTOR  OF  SAMPLE  COMPONENT 
C  *REL I  ABILITIES.  THIS  PROCESS  IS  REPEATED  FOR  EACH  COMPONENT 
C  *  AND  THEN  THE  RELIABILITIES  ARE  C0M8INE0  FOR  4  DIFFERENT  TYPES 
C  *  OF  SYSTEMS  TO  YIELD  4  VECTORS  OF  SAMPLE  SYSTEM  RELIABILITIES. 

C  *  THESE  VECTORS  ARE  ORDERED  AND  THEN  THE  95,  90,  AND  30  PERCENT 
C  *  LOWER  CONFIDENCE  LIMITS  ARE  PICKED.  THIS  ESTABLISHES  THE  95, 

C  *  90,  AND  30  PERCENT  CONFIDENCE  INTERVALS  FOR  EACH  SYSTEM  AND  IT 
C  *  IS  NOTED  WHETHER  EACH  OF  THESE  INTERVALS  CONTAINS  THE  TRUE 
C  *  SYSTEM  RELIABILITY. 

C  *  THE  ABOVE  PROCESS  IS  REFEATED  FOR  NOLMC  MONTE  CARLO  RUNS,  WITH 
C  *  COUNTERS  FOR  EACH  SYSTEM  TO  TRACK  THE  NUMBER  OF  TIKES  THAT  THE 
C  *  CONFIDENCE  INTERVALS  CONTAIN  THE  TRUE  SYSTEM  RELIABILITY. 

C  * 

c 

DIMENSION  CC (550) .THETA (5 5 3) ,EK(550> 

. "DIMENSION  A  RCHAT (2000  ,5)  ,  ATRSI4),  BI<12,15),  C(4,4),  DEV 

1  (600  ),  PA  RAM  (3, 5),  R  (50  0 ,5 ) , RC (  600 ,5 ) , RCH AT 

- 2  -(5),  RLBS  (12),  RS  ( 6  0  0)  ,  SIG(12,15),  SI5SQ  . . . . 

3  (12,15),  SMSZ  ( 1 5 )  ,  T  EMP  (  20  0),  TRC(5),  TRS(l), 

V  HK(  2  0  0)  - -  - -  - 

DOUBLE  PRECIS IO NO  SEE  D 

'REAL  KHAT  * . . . . 

DATA  RLBS  /  .5,  .55,  .6,  .65,  ,7,  .75,  .e,  .85,  .9,  .925,  .95, 

- 1-  .98  /  '  '  . . . . .  - .  '  ‘  . 

C 

“DATA  SMSZ  r  8.,  9.,  10.,  11.,  12.,  13.,  14.,  15.,  20.,  25., 

1  30.,  40.,  50.,  75.,  ]00  «  / 

INITIALIZE  VARIABLES 

PI  =4.  *  ATAN(1.)  . -  -  ’  - - -  - - 

READ*  ,  OSEED  *  T 
CALL  RANSET  (  T) 

TIME  =100. 

NRLBS  =12  . 

NSMSZ  =15 

NSMSZ1  =NSMSZ  -  1  . . . 

NRLBS1  =N9LBS  -  1 

ISO  =12 

NTRUNC  =0 

LTRUNC  =  0 
NS1C99  =0 

NS1C95  =0 
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NS1C90  =0 

NS ICAO  =0 

NS1C70  =0 

nsicso  =o 

NS1C50  =0 

NS2C99  =0 

NS2C95  =0 

NS2C90  =0 

NS2C80  =0 

NS2C70  =0 

NS2C50  =0 

NS2C50  =0 

NS3C99  =0 

NS3C95  =0 

NS3C90  =0 

NS3C80  =0 

NS3C70  =0 

NS3C60  =0 

NS3C50  =0 

NS4C99  =  0 
NS4C95  =0 

NS4C90  =0 

NS4C80  =0 

NS4C70  =0 

NS4C60  =0 

NS4C50  =0 

C 

PRINT  409 

C  REAO  THE  SAMPLE  SIZE  AND  NUMBER  OF  MONTE  CARLO  RUNS 
READ** NUM 

READ*,NMCT,  IOIMT,NPTS 
READ*, Ml  ,M2, M3,M4, M5,  M6,M7 

'  READ  *,  NSAM,  NOLMC  '  ‘  . . . 

PRINT  419,  NSAM,  NOLMC 

RNSAM  =  NSAM  “ 

M=NSAM 

-  MR=0  . . .  '  '  ‘ '  ‘ 

C  READ  THE  TRUE  COMPONENT  PARAMETERS 

REAO  *,  ( (PARAM<  I ,  J)  ,  1=1,  3),  J*i,  5) 

PRINT  429,  ((J,  ( PAR JM( I,  J) ,  1=1,  3),  CMPREL ( T INE,  P ARA H ( 1 , 

*1  PARAM (  2 ,  J),  PA  RAM { 3 ,  J))),  J=l,  5) 

REAO*,  (  (S IG  (  t  ,  J)  ,  J  =  1 ,  15),  1=1,  12) 

~  READ*,  ((  EI(  I,  J),J=1,  15), 1=1,  12) 

PRINT  439,  (CSIGtl,  J),  J=l,  15),  1  =  1,12) 

. PRINT  439,  ((BI(I,  J),  J=l,  15),  1  =  1,12) 


THIS  OUTSIDE  LOOP  FROM  HERE  TO  STATEMENT  300  COMPLETES 
NOLMC  MONTE  CARLO  RUNS  OF  THE  SIMULATION. 

OO  300  NCOUNT  =  1,  NCLMC 


FOR  EACH  OF  5  COMPONENTS,  THIS  LOOP  GENERATES  THE  ML E  OF  RCHAT 
FROM  THE  MLES  OF  K  ANC  THETA.  IT  DETERMINES  THE  VARIANCE  OF 
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C  RCHAT  ANO  THEN  SAMPLES  FROM  THE  NORMAL  DISTRIBUTION  FOR  NOEV 
C  SAMPLE  RELIABILITIES  OF  EACH  COMPONENT. 

C 

00  290  J  =1.  5 
TK  =  PARA  M  ( 1 ,  J) 

THETA  =  PARAM  <2,  J) 

TC  =  PARAM  (3,  J)  . 

C  PASS  INFORMATION  ON  COMPONENT  NUMBER  AND 
C  SAMPLE  SIZE  THRU  ARRAY  R 
R(205,  1)  =  J 
R( 20  4»  J)  =  NSAM 

C  DETERMINE  THE  TRUE  COMPONENT  RELIABILITY 

TRC i J)  =CMPREL(TIM£»  TK,  TTHETA,  TC) 

GATHER  NSAM  FAILURE  TIMES  FROM  THE 
HEIBULL  DISTRIBUTION  HTH  TRUE  PARAMETERS 
TK, TTHETA,  AND  TC 

CALL  GGWIB  (OSEEO,  TK,  NSAM,  TEMP) 

DO  20  I  =1,  NSAM 
R(  I,  J)  =TTHETA  *  TEMP(I)  ♦  TC 
20  CONTINUE 

DETERMINE  THE  LIKELIHOOD  CF  DRAWING  THIS  SAMPLE 
USING  HE  TRUE  K,  THETA,  ANO  C 

DETERMINE  THE  MLE  OF  THETA  ANO  K 

BY  HARTER  L  MOORES  ITERATIVE  SCHEME  -  - 


CCC1)  =TC  -  -  -  - -  ■ 

THETAC 1)  =  TTHETA 

EK(  1)  =TK  '  •'  ”  ’  -  •  *  - 

CAU  PAR  ES(  NSAM,M,CC,THETA,EK,  MR,  THAT,  KHAT,  R  Cl,  JM 

c  . . .  '  . . 

C  “DETERMINE  RCHAT,  THE  MLE  OF  THE  COM  FOMENT  RELIABILITY,  US I NS 
C  THE  TRUE  C  AND  THE  ML ES  OF  K  AND  THETA 

RCHAT(J)  =  CM PREL (TI ME,  KHAT,  THAT,  TC)  . 

C 

C'  ‘GIVEN  THE  MLE  OF  THE  COMPONENT  RELIABILITY  AND  THE  SAMPLE  SIZE, 

C  ENTER  THE  2-01 MENSIONAL  ARRAY  31  AND  FIND  THE  BIAS  OF  THE 

C'  ESTIMATOR  -  '  ‘  - - -  *  '  * . . 

DO  50  I  *1,  NSMSZ1 

. .  LSMSZ  *1  *  - -  -  - 

IF  (RNSAM  ,LE.  SMS2CH1))  GO  TO  60 

50  CONTINUE  - * - -  - - - 

GO  TO  90 

‘  60  IF  ( RCHAT C J)  ,LT.  .5)  GO  TO  100  ‘ 

DO  70  I  si,  NRLBS1 

LRL8S  =1 

IF  (RCHAT(J)  ,LE.  FLBS (1+1 ) )  GO  TO  80 

- 70  CONTINUE 

GO  TO  90 

00  CALL  iecicu  cbi,  ISO,  RLBS,  nrlbs,  SMSZ,  NSMSZ,  LRLBS,  LSMSZ, 
1  C,  MM,  IER) 

CALL  IECEVU  (RLBS,  NRLBS,  SMSZ,  NSMSZ,  LRLBS,  LSMSZ,  C, 

1  RCHAT ( J)  ,  PNSAM,  BIAS,  IER) 

IF  (LRLBS  .LT.  NRLBS)  GO  TO  110 


oooo 


90  BIAS  =0. 

30  TO  110 

100  IF  {RNSAM  .EQ.  SMSZ(LSMSZ  ♦  II)  LSMSZ  =  LSMSZ  ♦  1 
BIAS  =  BI(1,  ISMS;) 

110  RCHAT(J)  =RCH  AT ( J)  -  BIAS 

ARCH  AT (  N  COUNT  ,  J)  =  RCHAT(J) 

C 

C  GIVEN  HE  UNBIASE0  ESTIMATOR  OF  THE  COMPONENT  RELIBILITY* 
C  ENTER  THE  2-01 MENSI CM A l  ARRAY  SIG  AND  FIND  THE  STANDARD 
C  DEVIATION  OF  THE  UNBIASED  ESTIMATOR 


1 


120 

130 

140 

150 

1 

1 

160 

170 

180 


Z  =RCHAT < J) 

RCRLB  =SQRT(Z**2*  (ALOG(Z) ) ** 2* ( 1. 1 09-. 514* 

ALOGC - ALOG( Z ) I  +  .6 0 8* ( ALOG < -ALOG ( Z I) I **2) /RNSAM) 

00  12  0  I  =1,  NSMSZ1 
LSMSZ  =1 

IF  (RNSAM  .LE.  SMSZ(I*1I)  GO  TO  130 
CONTINUE 
30  TO  160 

IF  (RCHAT(J)  .LT.  .5)  GO  TO  170 
DO  140  I  =1,  NRLBS1 
LRLBS  =1 

IF  (RCHAT(J)  .LE.  RLBS(Id))  GO  TO  150 
CONTINUE  '  '  ' 

30  TO  160 

CALL  IBCICU  (SIG,  ISO,  RLBS,  NRLBS*  SMSZ,  NSMSZ»  LRLBS, 
LSMSZ,  C,  WK,  IERI 

CALL  IBCEVU  (RLBS,  NRLBS,  SMSZ.NSMSZ,  LRLBS,  LSMSZ,  C, 
RCMT(J),  RNSAM,  SIGMA,  IERI 
IF  (SIGMA  .GE.  RCRIB)  GO  TO  180 
SIGMA  =RC  RLB 

IER  =0 


GO  TO  180 

IF  (RNSAM  .EQ.  SMSZ(LSMSZ  ♦  1)1  LSMSZ=LSMSZ  ♦  1 
SIGMA  =SIG(1,  LSMSZ) 

IF  (SIGMA  .GE.  RCRIB)  GO  TO  180  . . . 

SIGMA  =RCRLB 

CONTINUE  '  . . 


C 

C  FORM  A  VECTOR  OF  NOE V  SAMPLE  RELIABILITIES  WITH  MEAN  RCHAT 
C  AND  A  STANDARD  OEVIATION  CF  SIGMA 

.  NOEV=NMCT  ~  . 

CALL  GGNML  (OSEEO,  NOEV,  OEV) 

DO  190  1  =  1,  NOEV  ' 

RC  (I,  J)  =  RCHAT  ( J)  ♦  OEV  (  I )  *  SIGMA 

.  '  tF(RC(  I,  JI.LT.0.0)  LTRUNC  =  LTRUNC  +  1  *  “  “  ' 

IF  ( RC  (  I ,  J) .  LT  .0.0)  RC(I,J)=n.O 

C  TRUNCATE  THE  NORMAL  DISTRIBUTION  IF  COMPONENT  RELIABILITY 
C  IS  GREATER  THAN  1 

IF  (RC( I, J)  .LE.  1.)  GO  TO  190 
RC  ( I,  J)  =1. 

NTRUNC  =NTRUNC  *1 
190  CONTINUE 
290  CONTINUE 


FOR  EACH  OF  THE  4  SYSTEMS,  THE  DIFFERENT  COMPONENTS  ARE  COMBINED 
TO  YIELD  NOEV  SAMPLES  OF  THE  SYSTEM  RELIABILITY.  THESE  SAMPLES 
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C  ARE  SEQUENCED  IN  ASCENDING  OROER  AND  THEN  COUNTERS  KEEP  TRACK 
C  OF  WHEN  THE  90,  95,  90,  8  C,  70,  60,  ANO  50  PERCENT  CONFIDENCE 
C  INTERVALS  CCNTAIN  THE  TRUE  SYSTEM  RELIABILITY. 

C 

C  SYSTEM  1  " 

NMC  =1 

. 10  IN  *1  .  * 

CALL  REL 1  (NMC,  TRC,  TRS ,  IDIM) 

ATRS(l)  =TRS(1) 

NMC=NMCT 
IDIMsIDIMT 
NALPH  A  =  1 

CALL  RELGK NMC, RC , RS , ICIM , NUM, NALPHA , NSAM ) 

CALL  VSRTA  (RS,  IDIM) 

IFIRS(Ml) .LE.TRS(i) )  NS1C 99=NS 1C 99+i 
NALPMA=2 

'  CALL  RELGK  NMC,RC,RS,  ICIM,  NUM,  NALPHA,NSAM> 

CALL  VSRTA  (  RS  ,  IDIM) 

IF  (RS  (  M2)  .LE.TRSt  1) )  N SIC 95=NS1C 95*1 
NALPHA  =3 

CALL  RELG1(NMC,RC,RS»ICIM,  NUM,  NAL  PHA ,  NSAM) 

CALL  VSRTA  (RS,  IDIM) 

‘  IF(RS(M3).LE.TRS(1))  NS1C90=NS1C90+1 
NALPH  A  =4 

‘  CALL  RELC1( NMC,RC, RS, ICIM, NUM, NALPHA, NSAM) 

CALL  VSRTA  (  RS ,  IDIM) 

IF(RS (M4).LE.TRS(1))  N SIC 8Q=NS1C 8 0+1  -  ’  . . 

NALPHA  =5 

"  CALL  RELGK  NMC, RC,RS,  ICIM,NUH,  NALPHA, NSAM)  . . . 

CALL  VSRTA  (  RS,  IDIM) 

’  IF(RS(M5).LE.TPS(1))  NS 1C  70= NS  1C 7 0*1 
NALPHA=6 

"CALL  RELG1(NMC,RC,RS, ICIM, NUM, NALPHA, NSAM)  . . . 

CALL  VSRTA  (RS,  IDIM) 

- IF(RS(M6) .LE.TRS( 1) >  N SIC 60  =  NS 1C  60*1  - 

NALPH A  =  7 

- CALL  RELG1(NMC,RC,RS, ICIM, NUM,NALPHA, NSAM)  -  - 

CALL  VSRTA  (  RS  ,  10  IM) 

- 1F(RS(  M7).LE.TRS(  1) )  NS1 C5Q=NS 1C50* 1 - - 

"SYSTEM  2  - - - - - 

NMC  =1 

’  IDIM  '  *1  •  ' . .  “  '  . . -  . .  *  • 

CALL  REL2  (NMC,  TRC,  TRS,  IDIM) 

. . .  ATRS  (2)  =TRS  (  1)  .  . . '* . ~ . 

NMC=MMCT 

IOIM=I OIMT  .  - 

NALPHA=1 

CALL  RELG2(  NMC,  RC,RS,IOIM,  NUM,  NALPHA, NSAM) 

CALL  VSRTA  (RS,  ICIM) 

- .  IF(RS(M1).LE.TRS(1) )  NS2C99=NS2C99U . . . 

NALPHA=2 

CALL  RELG2(NMC,RC,RS, ICIM, NUM,NALPHA, NSAM)  '  ' 

CALL  VSRTA  (RS,  ICIM) 

IF(RS(M2  ).LE.T=>S(  1)  )  NS2C  95  =  N32C 95 *1 

NALPHA=3 

-  CALL  RELG2(  NMC, RC,RS,  ICIM,  NUM,NALPHA, NSAM) 
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CALL  VSRTA  (RS,  IDTH) 

IF(RS(M3  ).LE.TRS(  1))  NS2C90=NS2C90*i 
NALPH A  =4 

CALL  RELG2( NMC, RC, RS, IOIM, NUM,  NALPHA  »NSAM) 
CALL  VSRTA  (RS,  IOIM) 

IF  CRS ( M4 )  .LE.TRSI 1) )  NS2C80=NS2C 80*1 
NALPHA =5 

CALL  RELG2(NMC,RC,RS, ICIM , NUM, NALPHA ,NSAM) 
CALL  VSRTA  IRS,  ID  TM) 

IF  IRS  I  MS)  .LE.TRSI  1)  )  NS2C70=NS2C70+t 
NALPH  A  =6 

CALL  RELG2I NMC.RC, RS, I CIH , NUM, NALPHA ,NSAM) 
CALL  VSRTA  IRS,  IOIM) 

IFCRSIM6)  .LE.TRSI  1)  >  NS2C 6Q=NS2C60 *1 
NALPHA  =7 

CALL  RELG2I NMC,RC, RS, IOIM, NUM,  NALPHA  »NSAM) 
CALL  VSRTA  IRS,  IOIM) 

IF (RSI  M7 ) .LE.TRS (1)1  NS2C50=NS2C5Q»i 

SYSTEM  3 

NMC  =1 

IOIM  =  1 

CALL  REL3  (NMC,  TRC,  TRS,  IOIM) 

ATRSI3)  =  TRS  (1) 

NMC=NMCT 
IDIM= I DIMT 
NALPHA=1 

CALL  RELG3I NMC, RC,RS, IOIM, NUM, NALPHA, NSAM) 
CALL  VSRTA  (RS,  IOIM) 

IF(RS( Ml)  .LE.TRSI 1) )  NS3C99=NS 3C99+1 
NALPHA=2 

CALL  RELG3I NMC, RC,RS, IOIM, NUM, NALPHA, NSAM) 
CALL  VSRTA  (RS,  IOIM) 

IFCRSI  M2)  .LE.TRSI  1)  )  N  S3C  95=NS3C95U 
NALPH A= 3 

CALL  RELG3(NMC,RC,RS, IOIM , NUM, NALPHA ,NSAM> 
CALL  VSRTA  (RS,  IOIM) 

IF  CRS  (M3)  .LE.TRS  I  1)  )  N  S3C  90  =  NS  3C  9  0  +  1 
NALPH A=4 

CALL  RELG3I  NMC, RC,RS, IOIM, NUM, NALPHA, NSAM) 

“  . . CALL  VSRTA  (RS,  IOIM) 

IFCRSCM4)  .LE.TRSI  1)  )  N  S3C  80=  NS  3C  8  0U 
NALPHA=5 

CALL  RELG3I NMC, RC, RS, IOIM, NUM, NALPHA, NSAM) 
CALL  VSRTA  (RS,  IOIM) 

IFCRSI M5)  .LE.TRSI  1)  )  NS3C  70=NS3C70*1 
NALPH A=6 

CALL  RELG3I NMC, RC , RS , IOIM , NUM,  NA LPHA ,NSAM) 
CALL  VSRTA  (RS,  IOIM) 

IFCRS I M6 ) .LE . TRS I  1) )  NS3C 60= NS 3C 60 U 
NALPH A=7 

CALL  RELG3INMC.RC, RS, IOIM, NUM, NALPHA,NSAM) 
CALL  VSRTA  (RS,  IOIM) 

IFCRSI  M7)  •  LE.TRS  ID)  NS3C50=NS3C50*1 

SYSTEM  4 

NMC  *  1 


IDIH  =  i 

CALL  REL4  (NMC,  TRC  ,  TRS,  IDIM) 

ATRS(4)  =  TRS(l) 

NMC=NMCT 
IDIM= IOIMT 
RALPH A =1 

CALL  RELG4( NMC, RC »  RS, ICIM,NUM, NALPHA»NSAM) 
CALL  VSRTA  (RS,  IDIM) 

IF(R3 ( Ml) .LE»TRS( 1) >  NS4C  99=NS4C99*1 
NALPH  A  =2 

CALL  RELG4<  NMC, RC , RS, ICIM,NUK, NALPHA,NSAM) 
CALL  VSRTA  <  RS  ,  IDIM) 

IF (RS ( M2 )  .LE.TRS(l) )  N S4C 95=NS4C95+i 
NALPHA  =  3 

'  CALL  RELG4(NMC,RC,RS, IDIM, NUM, NALPHA, NSAM) 
CALL  VSRTA  ( RS ,  IDIM) 

. IF(RS(M3)  .LE.TRSt  D)  NS4C 90=NS4C9Q*1 

NALPHA =4 

CALL  RELG4(NMC,RC«  RS,  ITIM.NUM,  NALPHA, NSAM) 
CALL  VSRTA  ( RS ,  IDIM) 

IFCRS ( M4 ) «LE  •  TRS  ( 1 ) )  NS4C  00  =  NS 4C 80*1 
NALPHA  =  5 

CALL  RELG4(NMC,RC,RS, IOIM, NUM,NALPHA, NSAM) 
CALL  VSRTA  <  RS ,  IDIM) 

IF( RS ( M5 )  .LE.TRS( 1) )  N  S4C  70  =  NS 4C 70*1 
NALPHA  =6 

. *  CALL  RELG4(NMC,RC,RS,iriM,NUM,NALPHA,NSAM) 

CALL  VSRTA  (  RS ,  IOIM) 

IF(RS(M6) ,LE.TRS( 1) )  NS4C60=NS4C60*i 
NALPHA =7 

. CALL  RELG4( NMC, RC , RS, ICIM, NUM, NALPHA, NSAM) 

CALL  VSRTA  (RS,  IOIM) 

- IF(RS(  M7 ) • LE  «TRS ( 1) )  NS4C5Q=NS4C50* 1 

300  CONTINUE 


c 

- NPT=5»NPTS*NDLMC  ‘  -  ~ - -  - " 

PRINT  350,  L TRUNC 

35 0  *  FORMAT ( 1H  , 11HTHERE  WERE  ,I7,18H  LOWER  TRUNCATIONS)  ' 

PRINT  469, N  TRUNC , NPT 

-  RNOLMC  =  NOLMC  . ---  --  -  ■  -  ■ 

C  FOR  SYSTEM  1,  DETERMINE  THE  99,  95,  90,  80,  70,  60,  AND  50 
C  PERCENT  CONFIDENCE  LIMIT  COVERAGE  OT  THE  TRUE  SYSTEM  RELIABILITY 
PS1C99  =  NS1C99  /  RNOLMC 

PS1C95  =  NS1C95  /  RNOLMC 

PS1C90  =  NS1C90  /  RNOLMC 

PS1C80  =  NS1C80  /  RNOLMC  * 

PS1C70  =  NS1C70  /  RNOLMC 

.  PS1C60  =  NS1C60  /  RNOLMC  . .  . 

PS1C5  0  =  NS  1C 5 0  /  RNOLMC 

C  FOR  SYSTEM  2,  DETERMINE  THE  99,  95,  90,  80,  70,  60,  AND  50 
C  PERCENT  CONFIDENCE  LIMIT  COVERAGE  OF  THE  TRUE  SYSTEM  RELIABILITY 
PS2C99  =  NS2CD9  /  °N0LMC 

PS2C95  =  NS2C95  /  RNOLMC 

----  -  PS2C90  =  NS2C90  /  RNOLMC 

— - . . -  -  180 


I 


PS2C80 
PS2C7  0 
PS2C6  0 
PS2C50 
SYSTEM 


=  NS2C80  / 
=  NS2C70  t 
-  NS2C60  t 
=  NS2C50  / 
DETERMINE 


RNOLMC 

RNOLMC 

RNOLMC 

RNOLMC 


PERCENT  CONFIDENCE  LIMIT  COVERAGE 
PS3C99  =  NS3C99  /  RNOLMC 

PS3C95  =  NS3C95  /  RNOLMC 

PS3C90  =  NS3C90  /  RNOLMC 

PS3C80  =  NS3C80  /  RNOLMC 

PS3C70  =  NS3C7D  /  RNOLMC 

PS3C63  =  NS3C60  /  RNOLMC 

PS3C50  =  NS3C5Q  /  RNOLMC 

FOR  SYSTEM  4,  DETERMINE  THE  99,  95 
PERCENT  CONFIDENCE  LIMIT  COVERAGE 


90,  80,  70,  60,  AND  50 
OF  THE  TRUE  SYSTEM  RELIABILITY 


,  90,  80,  70,  60,  AND  50 
OF  THE  TRUE  SYSTEM  RELIABILITY 


PS4C99  =  NS4C99  /  RNOLMC 

PS4C95  =  NS4C95  /  RNOLMC 

PS4C90  =  NS4C90  /  RNOLMC 

PS4C80  =  NS4C80  /  RNOLMC 

PS4C70  =  NS4C70  /  RNOLMC 

PS4C60  =  NS4C60  /  RNOLMC 

PS4C50  =  NS4C50  /  RNOLMC 

PRINT  479 

PRINT  489,ATRS(1) ,PS1C«9,  PS1C95 
PRINT  499 

PRINT  489,ATRSC2)  ,PS2C  <9,PS2C95 
PRINT  509 

PRINT  489,ATRS(3) ,FS3C99, PS3C95 
PRINT  519 

PRINT  489,ATRS<4> , PS4C *9,  PS4C95 


, PSiC90,PSiC80,PSlC70,PSlC6Q,PSlC50 
,  PS 2C90, PS2C 80 , PS2C70, PS2C  60, PS2C  5 0 
,PS3C90,PS  3C80, PS3C7  0*PS3C  60, PS3C  50 
,PS4C90,PS4C80,PS4C70,PS4C60,PS4C50 


STOP  "FORA  WHILE* 


409  FORMAT  <  1H1  ) 

419  FORMAT  (  " 

'  '  1  -*****»***»••,  /  f  -  *'•,  T  62 ,  T62, 

2  ,  "  T23,  "SAMPLE  "  "SIZE  =  ",  13,  T62,  "•“*  /  ,  " 

3  *  T62 ,  /  ,  "  *",  T22,  -MONTE  CARLO  -  “SIZE  =  -,  13, 


T62, 


4  T62 ,  "*",  /  ,  "  *",  T62,  T62,  / 

5  " 

6  -•"*///////  I 

429  FORMAT  C  5C1X,  “COMPONENT  ",  II,  /  ,  6X,  "K  *  ",  F4.2,  / 

1  6X,  "THETA  =  ",  F5.0,  /  ,  6X,  "C  *  ",  F2.0,  /  ,  6X , 

2  "RELIABILITY  =“,  F7.5,  /  /  I  ) 

439  FORMAT  (  15(1X,  F7.5J  ) 

449  FORMAT  </,"  mmmm,,-,/,-  MC=",  14,  4X,"J  =  ", 12, 4X,  "NST ART  =* 

1  ,/,  "  KH AT  =“  E13.6,  5X  "TH  AT=“  E13, 

2  "  ITE  RATIONS="  13,  5X  "IER="  13  /  “  *****•*•*•-  ) 

459  FORMAT  (  /  "  **•***••****•***•*•"  /  /  -  OID  NOT  CONVERGE 

1  "8  ATTEMPTS  WITH  CIFFERENT  STARTING  KH ATS"  /  "  THEREFORE 

2  "ING  ON  TO  THE  TEXT  COMPONENT"  /  /  "  **•#**•**••**»***•< 

3  ) 

469  FORMAT  <  /  /  ,  "  THERE  WERE",  17,  "  HIGH  TRUNCATIONS  OUT  OF" 

1  ,  18,  "  RELIABILITY  DEVIATES",  /  /  > 


/  0 

*",0C:> 

03  v 

,  00  <* 


’♦12 
6  /or 
oo 

I  N"C 
G  O"00 - 
0 


479  FORMAT  C  /  ~  **»*»  SYSTEM  1  •****"  /  -  (3  COMPONENTS  IN  SERI“0J 

l  "ES)"  I 

489  FORMAT  (  /  ,  -  TRUE  SYSTEM  RELIABILITY  =",  F7.S,  ✓ 

1  -  THE  99  PERCENT  COTFIDENCE  INTERVAL  COVERED  ",F6.4, 

2  "  OF  THE  RUNS”,/, 

3  -  THE  95  PERCENT  CONFIDENCE  INTERVAL  COVERED  ",  F6.4, 

4  "OF  THE  RUNS",/,"  THE  90  PERCENT  CONFIDENCE  INTERVAL  COVERED  ~ 

5  ,  F6.4,"  OF  THE  RUNS",/,"  THE  80  PERCENT  CONFIDENCE  INTERVAL" 

_  6  "  COVERED  ",F6.4,"  OF  THE  RUNS",/,"  THE  70  PERCENT  CONFIDENCE  “ 

7  "INTERVAL  COVERED  “,F6.4,~  OF  THE  RUNS",/,"  THE  60  PERCENT  “ 

8  "CONFIDENCE  INTERVAL  COVERED  ",F6.4,"  OF  THE  RUNS",/,"  THE", 

9  "  50  PERCENT  CONFIDENCE  INTERVAL  COVERED  ~,F6.4,"  OF  THE  RUNS", 

' —  1  ///> 

499  FORMAT  C  /  “  *****  SYSTEM  2  *••*•"  /  "  <1  COMPONENT  IN  SERIE"0 

'  1  *  "S  WITH  2  "  "IN  PARALLEL)"  > 

509  FORMAT  (  ✓  "  *****  SYSTEM  3  •***•"  /  ~  13  COMPONENTS  IN  PARA"0> 

"  1*  "LLELJ"  ”)  —  “  . 

519  FORMAT  <  /  "  *****  SYSTEM  4  *•***"  /  "  (A  5-COMPONENT  COMPLE"0: 

1  ‘  "X  NETWORK)"  )  . 

529  FORMAT  <  5C1X,  F10.8,  5X)  )  OC 


END 
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.  FUNCTION  CMPREL  <  TIME*  K,  THETA,  C) 

REAL  < 

IFCTHETA. EQ. TIME)  CMPREL* . 3678 7944 
IFCTHETA  .EQ. TIME)  GO  TC  9 

IF(TH£TA  .LT.  10E9  .ANO. THETA  .GE.1QE-7)  GO  TO  6 
IFCTHETA.  GE.10E9)  CMPREL=i.O 

IFCTHETA. GE. 0.0  «  ANO. T  hET  A.LT.10E-7)  CMPREL*0.0 
IFCTHETA  .LT.  0.0)  PRINT  5 
5  FORHATC1H  , 17HTHET A  IS  NEGATIVE) 

IFCTHETA  .LT. 0.0)  CMPREL=0.0 

RETURN  '  ""  ~ 

6  ARGUHs-C  CTIME-C) /THETA)**K 

.  IFCARGUM.GT.-20.0  .ANO.ARGUH.LT. 0.0)  GO  TO  8" 

IFCARGUM.GE.0.0)  CKPREL=1.0 
IFCARGUM.LE.-20.  0)  CMPREL  =  0.0 
RETURN 

6  CMPREL=EXPC ARGUH) 

9  RETURN 

*  END  " 


SUBROUTIKE  REL1  CNHC,  R,  RS,  IOIN) 

C  REL1  DETERMINES  THE  SYSTEM  RELIABILITY  OF  3  COMPONENTS  IN  SERIES 
DIMENSION  R  CI0IN,5),  RS  CIOIM) 

OO  10  I  *1,  NMC 

10  RSCI)  *RCI,  1)  *  RCI.2)  *  R ( I, 3) 

RETURN 

ENO 
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SUBROUTINE  REL2  (NMC,  R,  RS,  IDIH) 

C  REL2  DETERMINES  THE  SYSTEM  RELIABILITY  OF  1  COMPONENT  IN 
C  SERIES  WITH  2  IN  PARALLEL 

OIMENSION  R  ( ID IM,5) ,  RS  (IDIM) 

00  10  I  =1,  NMC 

10  RS(I)  =  R(t,  1)  *  (1.  -  (1.  -R(I#  2))  *  (1#  -R(I, 

RETURN 
END 


3)  n 


SUBROUTINE  REL3  (NMC,  R,  RS,  IDIM)"  -  -  -  .  — . 

C  REL3  DETERMINES  THE  SYSTEM  RELIABILITY  OF  3  COMPONENTS  IN  PARALLEL 
OIMENSION  R  (IDIM, 5)  RS  (IDIM) 

DO  10  I  =1,  NMC 

10  RS  ( I )  =1.  -  (1.  -RCI.1M  *  Cl.  -RCI*  2))  *  (1.  -R(I, 

1  3)  > 

RETURN 
END 

I 


SUBROUTINE  REL4  (NMC,  R,  RS,  IDIM) 

REL4  DETERMINES  THE  SYSTEM  RELIABILITY  CF  A  5  COMPONENT 
COMPLEX  NETWORK 

DIMENSION  R  (IDIM, 55,  RS  (IDIM) 

DO  10  I  =1,  NMC 

RS( I )  *R(I»  1)  •  ( 1  *  -(  1.  -R  ( I*  2))  •  (l.-R(I,5)  *  (1.- 

1  (1.  -  R  ( 1 ,3) )  *  (1.  -  R(I,4)>>>> 

10  CONTINUE 
RETURN 
ENO 
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MJUI  1  ftKtJ 


Z4//4 


OHI  =1 


FTN  4.8*51<i 


lUi 


SUBROUTINE  PARES  (N, M, C,THETA, EK, MR, PTH, PEK, Tl 
INPUT 

N=SAMPLE  SIZE  (BEFORE  CEN  SOR ING)  ,  N=1 00  OR  LESS  AS 
DIMEN  STONE C 

SS1=0  IF  SCALE  PARAMETER  THETA  IS  KNOWN 
SSi=l  IF  SCALE  PARAMETER  THETA  IS  TO  BE  ESTIMATED 
SS2=0  IF  SHAPE  PARAMETER  K  IS  KNOWN 

SS 2=1  IF  SHAPE  PARAMETER  K  IS  TO  BE  ESTIMATED 

SS 3=0  IF  LOCATION  PARAMETER  C  IS  KNOWN 

SS3=1  IF  LOCATION  PARAMETER  C  IS  TO  6E  ESTIMATED 

T(I)  =  I-TH  OROER  STATISTIC  OF  SAMPLE  (1  =  1, N) 

M=NUM 3ER  OF  OBSERVATIONS  REMAINING  AFTER  CENSORING  N-M 
FRCM  ABOVE 

C(  1)  =  INIT IAL  ESTIMATE  (OR  KNOWN  VALUE)  OF  C 
THETA  ( 1)  =  INITIAL  ESTIMATE  (OR  KNOWN  VALUE)  OF  THETA 
EK( 1)  = IN ITI AL  ESTIMATE  (OR  KNOWN  VALUE)  OF  K 
HR=NJMBER  OF  OBSERVATIONS  CENSORED  FROM  BELOW 
OUTPUT 

N»SS1»SS2»SS3,M,C  (  1)  ,TMETA(1),EK(1),MR 
— SAME  AS  FOR  INPUT 
C(J)=ESTIMATE  AFTER  J-l  ITERATIONS 
(OR  KNOWN  VALUE)  OF  C 
THETA (J)= ESTIMATE  AFTER  J-l  ITERATIONS 
(OR  KNOWN  VALUE)  OF  THETA 
EK(J)=ESTIMATE  AFTER  J-l  ITERATIONS 
(OR  KNOWN  VALUE)  OF  K 

. .  (MAXIMLM  VALUE  OF  J  AS  PRESENTLY  DIMENSIONED  IS  500) 

EL  =  NA I  UR  AL  LOG.  OF  LIKELIHOOO  FOR  C( J) , THETA ( J) , E K( J) 
DIMENSION  I (5Q0) , C  (55 0 ) ,THET A( 550) ,EK(550) ,X(56)  ,Y(55> 
SS1=1. 

’  ”  SS2=1  •  * . . 

SS3=0. 

- 1F(N)  66f  66f  l04  - - 

104  EN=N 

IF (M)  66, 66, 110  .  . 

110  EM=M 

31  ELNM=0  •  . . .  *  '  '  - - -  - 

EMR*MR 

- HRP=MR*i  -  - 

33  NM=N-M*1 

- DO  34  I=NM,N  - - - - - 

EI=I 

*34  ELNM=ELNMfALOG(EI)  . . .  . 

IF  (MR)  66,  35,74 

74  00  75  1=1, MR  . .  . . . . 

EI  =  I 

75  ELNM=ELNM-ALOG(EI) 

35  DO  30  J=  1,55 0 

.  IF  (J-l)  66,25,37 

37  JJ=J-1 

•  -  SK=0.  *  *  . 

SL=0. 

00  6  I=MRP,  M  . 

6  SK=SK*  (T(I)-C(JJ)  )**EK(JJ) 

IF  (SSI)  7,  7,  A 

7  THETA(  J)  =THETA(  JJ) 

-  GO  TO  9 
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8  '  IF  (MR)  66, 19,20 

19  THETA  C  J)  =  ((  SK* ( EN-EM) * (T ( M) -C(  JJ)  )  **EK( JJ) ) /EM) 

C**(  1»  /EK(  JJ)  ) 

GO  TO  9 

20  X(1)  =  TH£TA(  JJ) 

LS=0 

00  21  1=1,55  "  - 

LL=L-1 

LP=L* 1 

X  ( L°)  =XCU 

ZRK=(  ITC  KRP)  -C(JJ)  >/X(L>)  **EK(  JJ) 

YCL) =  -EK  (JJ) MEM-E^R) /X(L) *EK< JJ) *SK/X(L) ** (EK ( JJ) ♦!,) 
C*EK(JJ>  MEN-EM)  *(T(M)-C(  JJ) ) * *£K ( JJ) /X (L) ** ( EK ( JJ) *1 . 
C) -E9R*  EK (JJ) *ZRK*EXP(- ZRK) / ( X { L)  * (1 .-EXP(-ZRK) ) > 

IF  (Y  (  L)  )  53,  73,54 

53  LS=LS- 1 

IF  (LS*L)  58,55,58  . .  . 

54  LS=LS* 1 

IF  (LS-L)  58,56,58 

55  X(LP)  =  .5*X(L) 

GO  TO  61 

56  X(  LP)  =1«5*X(L) 

GO  TO  61 

58  IF  ( Y( L) *Y( LL) )  60,73,59 

59  LL=LL- 1 
GO  TO  58 

60  X(LP>  =  X(L)+Y(L)  MX(L)-X(LL))/(Y(LL)-Y(U> 

61  IF  (ABS(X(LP)-X(D) -l.E-4)  73,73,21 

21  CONTINUE 

73  THEYA(  J)=X(LP) 

9  EK(J)  =EK(  JJ)  .  ~ 

10  IF  (SS 2)  12, 12,11 

11  00  17  I=7RP,M  -  - - - - 

17  SL=SL*  ALCG( T (I)-C(JJ)) 

_  X(  1)  =EK(  J)  “  r~‘  - 

LS=0 

"  DO  51  L=  1,55  .  . 

SlK=0. 

00  18  1=  fRP ,  M  '  . 

18  SLK=SLKMALOG(T(I)-C(  JJ))  -ALOG(  THETA  ( J)) )  MT(I> -C  (JJ)  ) 
- C**X(L) 

LL=L-1 

. .  LP=L*i  . . ■  . 

X(LP)  =  X(  L) 

.  ZRK=((T(MRP)-C(JJ))/THETA(J))**X(L) 

Y(L)=(EM-EMR)*(1./X (L ) -ALOG < THEY  A ( J) ) ) ♦SL-SLK/THETA ( J) 
C**X(L)  ♦ ( EN-EM) * ( ALCG ( THEY  A ( J) ) -A  LOG (T( M) -C ( JJ) ) ) * (T ( H) 
C-C(JJ)  )  **X(L)/THETA(  J)  **X  (L)  ♦EMR*ZRXM  ALOG(ZRK)/X  (L)  ) 
C*EXP(-ZRK)/(1.-EXP(-ZRK)) 

IF  (Y ( L)  )  43,52,44 
4 J  LS*LS-1 

IF  (LS  *L )  47,  45,47 

44  LS=LS+ 1 

IF  (LS-L)  47,46,47 

45  X(LP>  =.5»X(L) 

GO  TO  50 

46  X<LP)*i.5*X(L> 
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GO  TO  50 

47  IF  (ni)»Y(U))  49,52,48 

48  LL =LL - 1 
GO  TO  47 

49  XCLP)=XCL)*YCL)MXCL)-XCLL))/CY(LL)-Y(L)> 

50  IF  C A8S C X (LP ) -X C L )  )-l«E-4)  52,52,51 

51  CONTINUE 

52  EK(J)=X(LP) 

12  C(J)=CCJJ) 

62  IF  CSS  3)  25,25,14 

14  IF  (l.-EK(J))  16,78,78 

78  IF  CSS  1*SS2)  57,57,  16 

16  XC1)=C(J) 

LS=0 

00  23  L= 1, 55  -  -  - 

SK1=0 • 

.  SR=0«  . .  . .  .  . 

00  15  I=MRP,M 

SK1=SK1*(T(  I)  -XCL)  )  *MEKC  J)-l.)  ‘ 

15  SR=SR*i«/(T  CII -XCL)  ) 

LL=L-1  “ 

LP=L*1 

XC LP)  =  XC  L)  . 

ZRK=C  CTCHRP) -XCL) ) /THETAC  J) ) **EKC J) 
YCL)=C1«-EKCJ))*SR*EKCJ)MSK1  +  CEN-EM)MTCH)  -XCL)) 
C*MEK(  J) -1. )) /THETA CJ) **E K< J)-EMR*EKC J) *ZRK*EXP (-ZRK) 

- C/«(T(MRP)-X(L)>*<i.-EXP(-ZRK)))  ' 

IF  C Y C  L)  )  39,  24,40 

39  LS=LS- 1  • 

IF  CLS+L)  70,41,70 

40  LS=LS*1  -  -  -  -  . . 

IF  CLS-L)  70,  42,70 

41  XCLP)  =  •  5  *XC  L)  - - - - 

GO  TO  22 

42  X(LP)  =  .5  *XCL)  ♦.5*TC  1)  - -  - - 

GO  TO  22 

70 ~ ”  IF  CY  CL)  *YCLL)  )  72,24,  71  “  *  ~  . . . 

71  LL=LL - 1 

- GO  TO  70  - -  - - - - 

72  XCLP)  =  X(L)*Y(L)MX(L)-X(LL))/(Y(LL)-YCL)  ) 

22  IF  CABSI  XCLP) -XCL  ))-l«E-4)  24,24,23  - 

23  CONTINUE 

24  *  C(J)sXCLP)  .  .  . .  "  '  - 

GO  TO  25 

57  ~  CCJ)=T(1)  **'  . . . . “  . . . 

25  IF  CMR )  66,38,69 

38  DO  63  1=1, H  . 

IF  CCC  J)  +  1.E-4-TC  I)  )  68,67,67 
67  MR=MR+1 

63  CC1)=T  Cl) 

68  IF  CMR)  66,69,31  “ 

69  SK=0. 

SL=0. 

00  36  I*MRP,H 

SK=SK*  CTC  T)  -CCJ) )  **EKC  J) 

36  SL=SL ♦ALOGCTC I)-C<  J)) 

ZRK=<  (TC  TRP)  -CCJ)  )/ THETA  C  J) )  **EKCJ) 
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£L=ELNMMEM-EMR>  *  (  ALOG  (EK  <  JJJ -EK  (  J)  *  ALOG  (  THETA  ( J)  >)  ♦ 
CCEK(J)  -i.»*SL-(SX*  CEN-EH)  *  ( T  IM> -C  (  J)  )  *  *EK  (  J)  )/  (THETA 
C  ( J)  **E  K(  J) )  ♦EMR*ALOG(l.-EXP(-ZRK>> 

150  IF(J-3>  30,  27,27 

27  IF  (A3S(C(J> -C(JJ)) -l.E-4)  28,28,30 

28  IF  (A8SCTHET  A(J)-TH£TA  ( JJ ) ) -1 • E-4)  29,29,30 
29  IF(A3S(EK(J) -EK( JJ) ) -l.E- 4) 126, 1 26, 30 

30  CONTINUE 
126  PTH=THETA(J) 

PEK=EK(  J) 

GO  TO  140  . . 

66  PRINT  135 

135  FORMAT (1H  , 2 OH ALL  SAMPLES  CENSOREO,/)'  ~  "  "*  . . 

PEK=0. 

PTH=0. . .  ‘  “ 

140  CONTINUE 

RETURN  . .  "  ~ 

END 


SUBROUTINE  RELG1 < NMC , ft* RS , 10 IK, NUM, NALPHA , NSAM) 

C  RELG1  DETERMINES  THE  SYSTEM  RELIABILITY  OF  3  COMPONENTS  IN  SERIES 
C  AFTER  ADJUSTING  FOR  PERFECT  SYSTEM  RELIABILITY 
OIMENSIO)  R<ICIM,5),  RS(IOIM),  F(5,7) 

DATA  F/. 0488, .1610,  .2531, .3721, .  4431, .4820, .4943, .0478, 

U  . 1584, . 2493, .3675, .4382, . 4771 ,. 4 893, . 0474, 

2  .1570,. 2475, .3652, .4359, .4747, .4870, .0467, 

3  .155  0, .  2445, .3615, .4319,  .47  07, . 4 8  30, . 046  4, 

.  4  .  1542,.  2435, .3603, .4307, .4694,  .4817/ 

RSAM=NSA  * 

DO  10  1=1, NMC 

RS(I)  =R<  I,1)*R(I,2)*R(I,3» 

10  IF<RS< I) .EQ.1.0)  RSCI)=1.0-  F< NUM, NALPHA) /RSAM 
RETURN 
ENO 


SUBROUTINE  RELG2( NMC , R ,RS , ID IM, NUM,NALPH A, NSAM) 

C  RELG2  DETERMINES  THE  SYSTEM  RELIABILITY  OF  ONE  COMPONENT  IN  SERIES 
C  WITH  TWO  IN  PARALLEL  AFTER  ADJUSTING  FOR  PERFECT  SYSTEM  RELIABILITY 
DIMENSION  R( IOIM, 5) ,  RS(IDIM),  F<5,7> 

OATA  F/.  0  48  8, .  1610, .25  31,  .3721, .  44  31 ,. 4320,  . 4943,  .0478, 

U  . 158  4, .  249  3,  .3675,  .43  82, .47  71, .  4  893, . 0474, 

2  .157  0,.  2475, .3 6 52,. 43 59,  . 47  47, . 4  870 ,. 0467, 

3  .155  0, .  244  5,  .36 15,. 43  19,  .47  07,.  4830,.  0464, 

4  .1542,.  2435, .360 3,. 43 07, .4694,. 4817/ 

RSAM=NSAM 

DO  10  1=1, NMC 

IF(R( 1,1)  .NE.  1.0)  GO  TO  8 

IF(R(I,  2)  .EQ.1.0.  OR.  R<  1,3)  .EQ.1.0)  GOTO  15 
8  RS(I)  sR(I,l)  Ml.  0-<  1  •  0-R(  1,2))  *  (  1.0-R(I,3)  )) 

GO  TO  10 

15  RS(I) =1. C-F  <  NUM, N  ALPHA) /RSAM 
10  CONTINUE 
RETURN 
ENO 
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SUBROUTINE  RELG3 ( NMC , R , RS , IOIM, NUM,NALPH A, NSAM) 

C  RELG3  DETERMINES  THE  SYSTfM  RELIABILITY  OF  THREE  COMPONENTS  IN  PARALL 
C  AFTER  ADJUSTING  FOR  PERFECT  SYSTEM  RELIABILITY 
DIMENSION  RIIOIM, 5)  ,  RSIIDIM),  FI5.7) 

DATA  F/.  0488,  .1610,  .2531,  .3721,  .  4431,  .4820,. <*9 4 3,  ,0478, 

U  .1584, . 2493, .3675, .4382, .4771, . 4893, . 0474, 

2  .1570,. 2475, .3652, .4359, .4747, .4870, .0467, 

3  .155  0 , .  244  5, .3615,  .4319,  .47  0  7, .  483  0, . 0464, 

4  .154  2,.  243  5, .3603,. 43 07,  .4694,.  4817/ 

RSAM=NSAM 

DO  10  1=1, NMC  '  ' .  'a”' 

IF  ( R(  1 , 1 )  .EQ.1.0.0R.R(I,2)  .EQ*1.0.0R.R(I,  3)  •  EQ .  1.  0)  GO  TO  15 
RS(I>  =1.  -  II.  -Rl 1,11)  *  Cl.  -RII,  2))  *  II.  -RII, 

1  3)  ) 

GO  TO  10  - 

15  RS  ( I)  =  1  •  C-F  (  NUM,  N  A  LPHA  )/RSAM 

10  CONTINUE  . 

RETURN 


SUBROUTINE  RELG4I NMC, R,RS , IDIM, NUM,NALPHA, NSAM> 

C  RELG4  DETERMINES  THE  SYST ?M  RELIABILITY  OF  A  FIVE  COMPONENT  SYSTEM 
C  AFTER  ADJUSTING  FOR  PERFECT  SYSTEM  RELIABILITY 
DIMENSION  RIICIM, 5) ,  RSIIDIM),  F(5,7) 

OATA  F/.  0488,  ,1610, .2531, .3721,.  4431, .4820, .4943,  .0478, 

U  ,1584  ,. 249 3,.  3675,. 4 3  82, .4771 ,.  4893, .  0474, 

2  .157  0  ,. 2475, ,3652,. 43 59, .  4747 ,.  4870  0467, 

3  .155  0,.  2445,  .3615,  .43  19,  .  47  07,  .  48  30,  .  0464, 

4  .  154  2,.  243  5,  .360  3,.  43  07,  .4694,.  48 17/ 

RSAM=NSAM 

00  10  1=1, NMC  “ 

IF  I  Rl  1 , 1 )  ,NE  •  1 .0  )  GO  TO  8 
IF  (RII, 21  .EQ.1.0)  GO  TO  15 
IFIRII,5).ME.1.0)  GO  TC  8 

IF  IRC  1 , 3)  .EQ.1.0. OR. Rl  1, 4)  .EQ.1.0)  GO  TO  15 
8  RS  1 1  )  =  Rl I,  1)  *  (1. -II. -RII,  2))  *  II  .-Rl 1,51  *  II.- 

i  II.  -  RII, 3)1  *  II.  -  Rl I, 4  ) )  ) ) ) 

GO  TO  10 

15  RSII)  =  1.  t-F |  NUM,  NALPH  A )/R S AM 
10  CONTINUE 

RETURN  . . 

END 
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